home *** CD-ROM | disk | FTP | other *** search
- ; Some macros for embedding function names in assember code.
- ; To embed names, 'Desk_AS_EMBED_FNNAMES' must be set to 1.
- ; This can be done with:
- ; objasm ... -PreDefine "Desk_AS_EMBED_FNNAMES SETA 1" ...
- ; To turn off, use:
- ; objasm ... -PreDefine "Desk_AS_EMBED_FNNAMES SETA 0" ...
- ;
- ; Julian Smith 19 Dec 1996
-
-
- IF Desk_AS_EMBED_FNNAMES=1
-
- MACRO
- Desk_ASMacros_EMBED_FNNAME $name
-
- $name.name
- DCB "$name", 0
- ALIGN
- $name.offset
- DCD &ff000000 :OR: ($name.offset-$name.name)
-
- MEND
-
- ELSE
-
- MACRO
- Desk_ASMacros_EMBED_FNNAME $name
- MEND
-
- ENDIF
-
- MACRO
- Desk_ASMacros_EXTERNALFUNCTION_NOEMBEDEDNAME $name
- EXPORT $name
- $name
- MEND
-
-
- MACRO
- Desk_ASMacros_EXTERNALFUNCTION $name
- Desk_ASMacros_EMBED_FNNAME $name
- Desk_ASMacros_EXTERNALFUNCTION_NOEMBEDEDNAME $name
- MEND
-
- END
-