git.sur5r.net Git - cc65/blob - libsrc/geos/disk/chkdkgeos.s

   1
   2 ;
   3 ; Maciej 'YTM/Alliance' Witkowiak
   4 ;
   5 ; 21.12.99
   6
   7 ; char ChkDkGEOS (void);
   8
   9             .export _ChkDkGEOS
  10
  11             .include "../inc/jumptab.inc"
  12             .include "../inc/geossym.inc"
  13
  14 _ChkDkGEOS:
  15         jsr ChkDkGEOS
  16         stx errno
  17         lda isGEOS
  18         rts