home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / comp / sys / atari / st / tech / 4587 < prev    next >
Encoding:
Text File  |  1992-08-26  |  2.2 KB  |  86 lines
  1. Newsgroups: comp.sys.atari.st.tech
  2. Path: sparky!uunet!Cadence.COM!cadence.com!bammi
  3. From: bammi@acae127.cadence.com (Jwahar R. Bammi)
  4. Subject: Re: Detecting GDOS presence
  5. In-Reply-To: hartlenk@newton.ccs.tuns.ca's message of Wed, 19 Aug 1992 00:56:21 GMT
  6. Message-ID: <BAMMI.92Aug26113011@acae127.cadence.com>
  7. Sender: usenet@Cadence.COM (Usenet News)
  8. Nntp-Posting-Host: acae127
  9. Organization: Cadence Design Systems
  10. References: <1992Aug19.005621.8575@newton.ccs.tuns.ca>
  11. Date: Fri, 14 Aug 1992 03:46:11 GMT
  12. Lines: 72
  13.  
  14. In article <1992Aug19.005621.8575@newton.ccs.tuns.ca> hartlenk@newton.ccs.tuns.ca (Kenneth W Hartlen) writes:
  15.  
  16. > Lattice  C v5.x provides a Lattice specific VDI  function  called 
  17. > vq_gdos()  which returns 0 if GDOS is not loaded and non-zero  if 
  18. > GDOS is loaded.
  19. > 
  20. > The  description  says "This function does not have  an  official 
  21. > name  but  uses  an Atari approved  method  for  determining  the 
  22. > presence  of GDOS." Anyone know what the "approved method" is  so 
  23. > GDOS presence can be checked from Heat & Serve/Sozobon C?
  24.  
  25. i seem to recall seeing an atari document that used the same name:
  26. here is what i have from the gcc gemlib: it should be easy to adapt to
  27. whatever: ( __MSHORT__ is defined when compiling for 16 bit integers)
  28.  
  29. int
  30. vq_gdos(void)
  31. {
  32.   register int retvalue __asm__("d0");
  33.  
  34. #ifdef __MSHORT__
  35.   __asm__ volatile
  36.     ("    movw    #-2,d0
  37.     trap    #2
  38.     cmpw    #-2,d0
  39.     sne    d0
  40.     extw    d0"
  41.      : "=r"(retvalue)        /* output */
  42.      :                /* no input */
  43.      : "d0", "d1", "d2", "a0", "a1", "a2"    /* clobbered regs */
  44.      );
  45. #else
  46.   __asm__ volatile
  47.     ("    movw    #-2,d0
  48.     trap    #2
  49.     cmpw    #-2,d0
  50.     sne    d0
  51.     extw    d0
  52.     extl    d0"
  53.      : "=r"(retvalue)        /* output */
  54.      :                /* no input */
  55.      : "d0", "d1", "d2", "a0", "a1", "a2"    /* clobbered regs */
  56.      );
  57. #endif
  58.  
  59.   return retvalue;
  60. }
  61.  
  62. /*
  63.  * return type of GDOS
  64.  * -2L     no GDOS installed
  65.  *  0x5F46534DL     '_FSM' gdos
  66.  *  0x5F464E54L     '_FNT' gdos
  67.  */
  68. unsigned long vq_vgdos(void)
  69. {
  70.     register unsigned long ret __asm__("d0");
  71.     __asm__ volatile ("
  72.      movq    #-2,d0
  73.      trap    #2"
  74.       : "=r"(ret)
  75.           :
  76.           : "d0", "d1", "d2", "a0", "a1", "a2" );
  77.     return ret;
  78. }
  79.  
  80. --
  81. --
  82. bang:   uunet!cadence!bammi            jwahar r. bammi
  83. domain: bammi@cadence.com
  84. GEnie:    J.Bammi
  85. CIS:    71515,155
  86.