git.sur5r.net Git - cc65/blob - libsrc/pet/kckout.s

   1 ;
   2 ; Ullrich von Bassewitz, 19.11.2002
   3 ;
   4 ; CKOUT replacement function for the PETs
   5 ;
   6
   7         .export         CKOUT
   8         .import         checkst
   9
  10
  11 .proc   CKOUT
  12
  13         jsr     $FFC9           ; Call kernal function
  14         jmp     checkst         ; Check status, return carry on error
  15
  16 .endproc
  17