[ro-oslib-commits] OSLib/!OsLib/Source/User/oslib TaskManager.swi,1.2,1.3

[<th...@us...>]

Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv24940/Source/User/oslib

Modified Files:
	TaskManager.swi 
Log Message:
Added Service_TaskManagerAcknowledgements.


Index: TaskManager.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/TaskManager.swi,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** TaskManager.swi	20 Nov 2002 19:33:51 -0000	1.2
--- TaskManager.swi	15 Dec 2002 14:42:32 -0000	1.3
***************
*** 53,56 ****
--- 53,72 ----
     TaskManager_ShutdownPowerOff          = TaskManager_ShutdownFlags: %1000000 "RISC O S 4+";
  
+ TYPE TaskManager_GroupID = .Bits;
+ CONST
+    TaskManager_GroupOverview   = TaskManager_GroupID: 0x0000
+       "system overview - for RISCOS Ltd use only",
+    TaskManager_GroupRequired   = TaskManager_GroupID: 0x1000
+       "system required components - for RISCOS Ltd use only",
+    TaskManager_GroupSubsidiary = TaskManager_GroupID: 0x2000
+       "subsidiary components - for RISCOS Ltd use only",
+    TaskManager_GroupCommercial = TaskManager_GroupID: 0x3000
+       "commercial components",
+    TaskManager_GroupFreeware   = TaskManager_GroupID: 0x4000
+       "freeware components",
+    TaskManager_GroupUser       = TaskManager_GroupID: 0x5000
+       "user components - for private use only",
+    TaskManager_GroupMask       = TaskManager_GroupID: 0xf000;
+ 
  SWI
     TaskManager_Shutdown =
***************
*** 65,67 ****
--- 81,91 ----
        ENTRY
        (  R0 -> .Char: path_name
+    )  );
+ 
+ SWI
+    Service_TaskManagerAcknowledgements =
+    (  NUMBER 0x30,
+       ENTRY
+       (  R1 # 0x42680 "Notify Task Manager of licence acknowledgements - RISC O S 4 only",
+          R2 = .Ref .Asm: add_message
     )  )