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

   1
   2 ;
   3 ; Maciej 'YTM/Elysium' Witkowiak
   4 ;
   5 ; 21.12.1999, 2.1.2003
   6
   7 ; char ChkDkGEOS (void);
   8
   9             .import setoserror
  10             .export _ChkDkGEOS
  11
  12             .include "jumptab.inc"
  13             .include "geossym.inc"
  14
  15 _ChkDkGEOS:
  16         jsr ChkDkGEOS
  17         jsr setoserror
  18         lda isGEOS
  19         rts