home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / programming / desklib / sources / DeskLib / !DLSources / Libraries / WimpSWIs / s / 31StrtTsk3 < prev    next >
Encoding:
Text File  |  1995-08-26  |  1.2 KB  |  48 lines
  1. ;
  2. ;       Title                  : Wimp Start Task (RISC OS 3)
  3. ;       System                 : Wimp Library
  4. ;       Version                : 1.0
  5. ;       Copyright              : (C) Sergio Monesi
  6. ;       Date                   : 21 Jan 1995
  7. ;       Author                 : Sergio Monesi
  8. ;
  9. ;       Function               : Starts a task and return his task handle.
  10. ;
  11. ;
  12. ;       Modification history.
  13. ;
  14. ;       Version                : (Reflect in header IDENT)
  15. ;       Date                   :
  16. ;       Author                 :
  17. ;       Changes                :
  18. ;
  19. ;
  20. ;============================================================================
  21. ;
  22. ;  Include files.
  23. ;
  24. ;============================================================================
  25. ;
  26.         GET     ^.h.regdefs
  27.         GET     ^.h.swinos
  28.         GET     ^.h.macros
  29. ;
  30. ;============================================================================
  31. ;
  32. ;  Code.
  33. ;
  34. ;============================================================================
  35. ;
  36.         PREAMBLE
  37.         STARTCODE Wimp_StartTask3
  38. ;
  39.         MOV     ip, lr
  40.         SWI     SWI_Wimp_StartTask + XOS_Bit
  41.         MOVVSS  pc, ip
  42.         TEQ     a2, #0
  43.         STRNE   a1, [a2]
  44.         MOV     a1, #0
  45.         MOVS    pc, ip
  46. ;
  47.         END
  48.