home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / desklib / Libraries / Font / s / Font02 < prev    next >
Encoding:
Text File  |  1993-04-03  |  367 b   |  21 lines
  1. ; Author: Copyright 1993 Shaun Blackmore
  2.  
  3.         GET     h.regdefs
  4.         GET     h.swinos
  5.         GET     h.macros
  6.  
  7. ; os_error *Font_LoseFont(FontHandle font);
  8.  
  9. ;       r0=font;
  10.  
  11.  
  12.         PREAMBLE
  13.         STARTCODE Font_LoseFont
  14. ;
  15.         STMFD   sp!, {lr}
  16.         SWI     SWI_Font_LoseFont + XOS_Bit
  17.         MOVVC   r0,#0
  18.         LDMFD   sp!, {pc}^
  19. ;
  20.         END
  21.