home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / d / desklib / !DeskLib / sh / FnNames next >
Encoding:
Text File  |  1996-12-19  |  816 b   |  46 lines

  1.     ; Some macros for embedding function names in assember code.
  2.     ; To embed names, 'Desk_AS_EMBED_FNNAMES' must be set to 1.
  3.     ; This can be done with:
  4.     ; objasm ... -PreDefine "Desk_AS_EMBED_FNNAMES SETA 1" ...
  5.     ; To turn off, use:
  6.     ; objasm ... -PreDefine "Desk_AS_EMBED_FNNAMES SETA 0" ...
  7.     ;
  8.     ; Julian Smith 19 Dec 1996
  9.     
  10.     
  11.      IF Desk_AS_EMBED_FNNAMES=1
  12.         
  13.         MACRO
  14.         Desk_ASMacros_EMBED_FNNAME $name
  15.         
  16. $name.name
  17.         DCB    "$name", 0
  18.         ALIGN
  19. $name.offset
  20.         DCD    &ff000000 :OR: ($name.offset-$name.name)
  21.         
  22.         MEND
  23.         
  24.     ELSE
  25.         
  26.         MACRO
  27.         Desk_ASMacros_EMBED_FNNAME $name
  28.         MEND
  29.         
  30.     ENDIF
  31.     
  32.     MACRO
  33.     Desk_ASMacros_EXTERNALFUNCTION_NOEMBEDEDNAME    $name
  34.     EXPORT    $name
  35. $name
  36.     MEND
  37.     
  38.     
  39.     MACRO
  40.     Desk_ASMacros_EXTERNALFUNCTION    $name
  41.     Desk_ASMacros_EMBED_FNNAME    $name
  42.     Desk_ASMacros_EXTERNALFUNCTION_NOEMBEDEDNAME    $name
  43.     MEND
  44.     
  45.     END
  46.