home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / oslib / Hdr / Territory < prev    next >
Encoding:
Text File  |  1994-08-31  |  12.0 KB  |  416 lines
  1. ;AAsm header file for Territory
  2. ;written by DefMod (Aug  8 1994) on Wed Aug 31 19:10:30 1994
  3.  
  4.         [       :LNOT: :DEF: Get_Types
  5.         GBLS    Get_Types
  6. Get_Types                       SETS    "GET OS:Hdr.Types"
  7.         |
  8. Get_Types                       SETS    ""
  9.         ]
  10.         $Get_Types
  11.  
  12.         [       :LNOT: :DEF: Get_OS
  13.         GBLS    Get_OS
  14. Get_OS                          SETS    "GET OS:Hdr.OS"
  15.         |
  16. Get_OS                          SETS    ""
  17.         ]
  18.         $Get_OS
  19.  
  20.         [       :LNOT: :DEF: Territory_Hdr
  21.         GBLS    Territory_Hdr
  22.  
  23. ;Symbols for constants
  24. Territory_Current               *       &FFFFFFFF
  25. Territory_IgnoreCase            *       &1
  26. Territory_IgnoreAccent          *       &2
  27. Error_TerritoryBadSWI           *       &43062
  28. Error_TerritoryUnknown          *       &190
  29. Error_TerritoryUnknownAlphabet  *       &191
  30. Error_NoTerritory               *       &192
  31. Territory_GivenTime             *       1
  32. Territory_GivenDate             *       2
  33. Territory_GivenDateAndTime      *       3
  34. Territory_WriteRightToLeft      *       &1
  35. Territory_WriteBottomToTop      *       &2
  36. Territory_WriteVertical         *       &4
  37. Territory_PropertyControl       *       0
  38. Territory_PropertyUppercase     *       1
  39. Territory_PropertyLowercase     *       2
  40. Territory_PropertyAlphabetic    *       3
  41. Territory_PropertyPunctuation   *       4
  42. Territory_PropertyWhitespace    *       5
  43. Territory_PropertyDigit         *       6
  44. Territory_PropertyHexDigit      *       7
  45. Territory_PropertyAccented      *       8
  46. Territory_PropertyForward       *       9
  47. Territory_PropertyReverse       *       10
  48. Territory_SymbolDecimalPoint    *       0
  49. Territory_SymbolGroupSeparator  *       1
  50. Territory_SymbolGroupingList    *       2
  51. Territory_SymbolInternationalCurrencySymbol *       3
  52. Territory_SymbolCurrencySymbol  *       4
  53. Territory_SymbolCurrencyPoint   *       5
  54. Territory_SymbolCurrencyGroupSeparator *       6
  55. Territory_SymbolCurrencyGroupList *       7
  56. Territory_SymbolCurrencyPlusSign *       8
  57. Territory_SymbolCurrencyMinusSign *       9
  58. Territory_SymbolInternationalCurrencyPrecision *       10
  59. Territory_SymbolCurrencyPrecision *       11
  60. Territory_SymbolCurrencySymbolPrecedesNonNegativeValue *       12
  61. Territory_SymbolCurrencySymbolSeparatedFromNonNegativeValue *       13
  62. Territory_SymbolCurrencySymbolPrecedesNegativeValue *       14
  63. Territory_SymbolCurrencySymbolSeparatedFromNegativeValue *       15
  64. Territory_SymbolCurrencyNonNegativeFormat *       16
  65. Territory_SymbolCurrencyNegativeFormat *       17
  66. Territory_SymbolListSeparator   *       18
  67. Territory_SymbolParenthesised   *       0
  68. Territory_SymbolSignPrecedes    *       1
  69. Territory_SymbolSignSucceeds    *       2
  70. Territory_SymbolSignImmediatelyPrecedes *       3
  71. Territory_SymbolSignImmediatelySucceeds *       4
  72.  
  73. ;Symbols for structure offsets and sizes
  74. Territory_T                     *       Int
  75.  
  76.                                 ^       0
  77. Territory_Data_e                #       43*Ptr
  78. Territory_Data                  *       @
  79.  
  80.                                 ^       0
  81. Territory_Ordinals_centisecond  #       Int
  82. Territory_Ordinals_second       #       Int
  83. Territory_Ordinals_minute       #       Int
  84. Territory_Ordinals_hour         #       Int
  85. Territory_Ordinals_date         #       Int
  86. Territory_Ordinals_month        #       Int
  87. Territory_Ordinals_year         #       Int
  88. Territory_Ordinals_weekday      #       Int
  89. Territory_Ordinals_yearday      #       Int
  90. Territory_Ordinals              *       @
  91.  
  92.                                 ^       0
  93. Territory_PropertyTable_p       #       8*Bits
  94. Territory_PropertyTable         *       @
  95.  
  96.                                 ^       0
  97. Territory_Calendar_first_working_day #       Int
  98. Territory_Calendar_last_working_day #       Int
  99. Territory_Calendar_month_count  #       Int
  100. Territory_Calendar_day_count    #       Int
  101. Territory_Calendar_pm_limit     #       Int
  102. Territory_Calendar_we_limit     #       Int
  103. Territory_Calendar_w3_limit     #       Int
  104. Territory_Calendar_dy_limit     #       Int
  105. Territory_Calendar_st_limit     #       Int
  106. Territory_Calendar_mo_limit     #       Int
  107. Territory_Calendar_m3_limit     #       Int
  108. Territory_Calendar_tz_limit     #       Int
  109. Territory_Calendar              *       @
  110.  
  111.  
  112. ;Symbols for SWI's and SWI reason codes
  113. XTerritory_Number               *       &63040
  114. Territory_Number                *       &43040
  115.    ;Exit
  116.    ;  R0 = territory (Territory_T)
  117.  
  118. XTerritory_Register             *       &63041
  119. Territory_Register              *       &43041
  120.    ;Entry
  121.    ;  R0 = territory (Territory_T)
  122.    ;  R1 -> entries (Territory_Data)
  123.    ;  R2 = workspace (pointer to Void)
  124.  
  125. XTerritory_Deregister           *       &63042
  126. Territory_Deregister            *       &43042
  127.    ;Entry
  128.    ;  R0 = territory (Territory_T)
  129.  
  130. XTerritory_NumberToName         *       &63043
  131. Territory_NumberToName          *       &43043
  132.    ;Entry
  133.    ;  R0 = territory (Territory_T)
  134.    ;  R1 = name (pointer to String)
  135.    ;  R2 = size (Int)
  136.  
  137. XTerritory_Exists               *       &63044
  138. Territory_Exists                *       &43044
  139.    ;Entry
  140.    ;  R0 = territory (Territory_T)
  141.  
  142. XTerritory_AlphabetNumberToName *       &63045
  143. Territory_AlphabetNumberToName  *       &43045
  144.    ;Entry
  145.    ;  R0 = alphabet (Int)
  146.    ;  R1 = name (pointer to String)
  147.    ;  R2 = size (Int)
  148.  
  149. XTerritory_SelectAlphabet       *       &63046
  150. Territory_SelectAlphabet        *       &43046
  151.    ;Entry
  152.    ;  R0 = territory (Territory_T)
  153.  
  154. XTerritory_SetTime              *       &63047
  155. Territory_SetTime               *       &43047
  156.    ;Entry
  157.    ;  R0 -> date_and_time (OS_DateAndTime)
  158.  
  159. XTerritory_ReadCurrentTimeZone  *       &63048
  160. Territory_ReadCurrentTimeZone   *       &43048
  161.    ;Exit
  162.    ;  R0 -> timezone (String)
  163.    ;  R1 = offset (Int)
  164.  
  165. XTerritory_ConvertTimeToUTCOrdinals *       &63049
  166. Territory_ConvertTimeToUTCOrdinals *       &43049
  167.    ;Entry
  168.    ;  R1 -> date_and_time (OS_DateAndTime)
  169.    ;  R2 = ordinals (pointer to Territory_Ordinals)
  170.    ;Exit
  171.    ;  R0 corrupted
  172.  
  173. XTerritory_ConvertTextToString  *       &63075
  174. Territory_ConvertTextToString   *       &43075
  175.  
  176. XTerritory_ReadTimeZones        *       &6304A
  177. Territory_ReadTimeZones         *       &4304A
  178.    ;Entry
  179.    ;  R0 = territory (Territory_T)
  180.    ;Exit
  181.    ;  R0 -> timezone (String)
  182.    ;  R1 -> dst_timezone (String)
  183.    ;  R2 = offset (Int)
  184.    ;  R3 = dst_offset (Int)
  185.  
  186. XTerritory_ConvertDateAndTime   *       &6304B
  187. Territory_ConvertDateAndTime    *       &4304B
  188.    ;Entry
  189.    ;  R0 = territory (Territory_T)
  190.    ;  R1 -> date_and_time (OS_DateAndTime)
  191.    ;  R2 = buffer (pointer to String)
  192.    ;  R3 = size (Int)
  193.    ;  R4 -> format (String)
  194.    ;Exit
  195.    ;  R0 corrupted
  196.    ;  R1 -> end (Char)
  197.    ;  R2 corrupted
  198.    ;  R3 corrupted
  199.  
  200. XTerritory_ConvertStandardDateAndTime *       &6304C
  201. Territory_ConvertStandardDateAndTime *       &4304C
  202.    ;Entry
  203.    ;  R0 = territory (Territory_T)
  204.    ;  R1 -> date_and_time (OS_DateAndTime)
  205.    ;  R2 = buffer (pointer to String)
  206.    ;  R3 = size (Int)
  207.    ;Exit
  208.    ;  R0 corrupted
  209.    ;  R1 -> end (Char)
  210.    ;  R2 corrupted
  211.  
  212. XTerritory_ConvertStandardDate  *       &6304D
  213. Territory_ConvertStandardDate   *       &4304D
  214.    ;Entry
  215.    ;  R0 = territory (Territory_T)
  216.    ;  R1 -> date (OS_DateAndTime)
  217.    ;  R2 = buffer (pointer to String)
  218.    ;  R3 = size (Int)
  219.    ;Exit
  220.    ;  R0 corrupted
  221.    ;  R1 -> end (Char)
  222.    ;  R2 corrupted
  223.  
  224. XTerritory_ConvertStandardTime  *       &6304E
  225. Territory_ConvertStandardTime   *       &4304E
  226.    ;Entry
  227.    ;  R0 = territory (Territory_T)
  228.    ;  R1 -> time (OS_DateAndTime)
  229.    ;  R2 = buffer (pointer to String)
  230.    ;  R3 = size (Int)
  231.    ;Exit
  232.    ;  R0 corrupted
  233.    ;  R1 -> end (Char)
  234.    ;  R2 corrupted
  235.  
  236. XTerritory_ConvertTimeToOrdinals *       &6304F
  237. Territory_ConvertTimeToOrdinals *       &4304F
  238.    ;Entry
  239.    ;  R0 = territory (Territory_T)
  240.    ;  R1 -> date_and_time (OS_DateAndTime)
  241.    ;  R2 = ordinals (pointer to Territory_Ordinals)
  242.    ;Exit
  243.    ;  R0 corrupted
  244.  
  245. XTerritory_ConvertTimeStringToOrdinals *       &63050
  246. Territory_ConvertTimeStringToOrdinals *       &43050
  247.    ;Entry
  248.    ;  R0 = territory (Territory_T)
  249.    ;  R1 = format (Int)
  250.    ;  R2 -> t (String)
  251.    ;  R3 = ordinals (pointer to Territory_Ordinals)
  252.    ;Exit
  253.    ;  R0 corrupted
  254.  
  255. XTerritory_ConvertOrdinalsToTime *       &63051
  256. Territory_ConvertOrdinalsToTime *       &43051
  257.    ;Entry
  258.    ;  R0 = territory (Territory_T)
  259.    ;  R1 = buffer (pointer to OS_DateAndTime)
  260.    ;  R2 -> ordinals (Territory_Ordinals)
  261.    ;Exit
  262.    ;  R0 corrupted
  263.  
  264. XTerritory_Alphabet             *       &63052
  265. Territory_Alphabet              *       &43052
  266.    ;Entry
  267.    ;  R0 = territory (Territory_T)
  268.    ;Exit
  269.    ;  R0 = alphabet (Int)
  270.  
  271. XTerritory_AlphabetIdentifier   *       &63053
  272. Territory_AlphabetIdentifier    *       &43053
  273.    ;Entry
  274.    ;  R0 = territory (Territory_T)
  275.    ;Exit
  276.    ;  R0 -> alphabet_name (String)
  277.  
  278. XTerritory_SelectKeyboardHandler *       &63054
  279. Territory_SelectKeyboardHandler *       &43054
  280.    ;Entry
  281.    ;  R0 = territory (Territory_T)
  282.    ;Exit
  283.    ;  R0 corrupted
  284.  
  285. XTerritory_WriteDirection       *       &63055
  286. Territory_WriteDirection        *       &43055
  287.    ;Entry
  288.    ;  R0 = territory (Territory_T)
  289.    ;Exit
  290.    ;  R0 = flags (Bits)
  291.  
  292. XTerritory_CharacterPropertyTable *       &63056
  293. Territory_CharacterPropertyTable *       &43056
  294.    ;Entry
  295.    ;  R0 = territory (Territory_T)
  296.    ;  R1 = property (Int)
  297.    ;Exit
  298.    ;  R0 -> table (Territory_PropertyTable)
  299.  
  300. XTerritory_LowerCaseTable       *       &63057
  301. Territory_LowerCaseTable        *       &43057
  302.    ;Entry
  303.    ;  R0 = territory (Territory_T)
  304.    ;Exit
  305.    ;  R0 -> table (Char)
  306.  
  307. XTerritory_UpperCaseTable       *       &63058
  308. Territory_UpperCaseTable        *       &43058
  309.    ;Entry
  310.    ;  R0 = territory (Territory_T)
  311.    ;Exit
  312.    ;  R0 -> table (Char)
  313.  
  314. XTerritory_ControlTable         *       &63059
  315. Territory_ControlTable          *       &43059
  316.    ;Entry
  317.    ;  R0 = territory (Territory_T)
  318.    ;Exit
  319.    ;  R0 -> table (Char)
  320.  
  321. XTerritory_PlainTable           *       &6305A
  322. Territory_PlainTable            *       &4305A
  323.    ;Entry
  324.    ;  R0 = territory (Territory_T)
  325.    ;Exit
  326.    ;  R0 -> table (Char)
  327.  
  328. XTerritory_ValueTable           *       &6305B
  329. Territory_ValueTable            *       &4305B
  330.    ;Entry
  331.    ;  R0 = territory (Territory_T)
  332.    ;Exit
  333.    ;  R0 -> table (Char)
  334.  
  335. XTerritory_RepresentationTable  *       &6305C
  336. Territory_RepresentationTable   *       &4305C
  337.    ;Entry
  338.    ;  R0 = territory (Territory_T)
  339.    ;Exit
  340.    ;  R0 -> table (Char)
  341.  
  342. XTerritory_Collate              *       &6305D
  343. Territory_Collate               *       &4305D
  344.    ;Entry
  345.    ;  R0 = territory (Territory_T)
  346.    ;  R1 -> s1 (String)
  347.    ;  R2 -> s2 (String)
  348.    ;  R3 = flags (Bits)
  349.    ;Exit
  350.    ;  R0 = collate (Int)
  351.  
  352. XTerritory_ReadSymbols          *       &6305E
  353. Territory_ReadSymbols           *       &4305E
  354.  
  355. XTerritory_ReadBooleanSymbols   *       &6305E
  356. Territory_ReadBooleanSymbols    *       &4305E
  357.    ;Entry
  358.    ;  R0 = territory (Territory_T)
  359.    ;  R1 = symbol_no (Int)
  360.    ;Exit
  361.    ;  R0 = symbol (Bool)
  362.  
  363. XTerritory_ReadIntegerSymbols   *       &6305E
  364. Territory_ReadIntegerSymbols    *       &4305E
  365.    ;Entry
  366.    ;  R0 = territory (Territory_T)
  367.    ;  R1 = symbol_no (Int)
  368.    ;Exit
  369.    ;  R0 = symbol (Int)
  370.  
  371. XTerritory_ReadStringSymbols    *       &6305E
  372. Territory_ReadStringSymbols     *       &4305E
  373.    ;Entry
  374.    ;  R0 = territory (Territory_T)
  375.    ;  R1 = symbol_no (Int)
  376.    ;Exit
  377.    ;  R0 -> symbol (String)
  378.  
  379. XTerritory_ReadCalendarInformation *       &6305F
  380. Territory_ReadCalendarInformation *       &4305F
  381.    ;Entry
  382.    ;  R0 = territory (Territory_T)
  383.    ;  R1 -> date_and_time (OS_DateAndTime)
  384.    ;  R2 = calendar (pointer to Territory_Calendar)
  385.    ;Exit
  386.    ;  R0 corrupted
  387.  
  388. XTerritory_NameToNumber         *       &63060
  389. Territory_NameToNumber          *       &43060
  390.    ;Entry
  391.    ;  R0 = territory (Territory_T)
  392.    ;  R1 -> name (String)
  393.    ;Exit
  394.    ;  R0 = territory_out (Territory_T)
  395.  
  396. XTerritory_TransformString      *       &63061
  397. Territory_TransformString       *       &43061
  398.    ;Entry
  399.    ;  R0 = territory (Territory_T)
  400.    ;  R1 = buffer (pointer to String)
  401.    ;  R2 -> s (String)
  402.    ;  R3 = size (Int)
  403.    ;Exit
  404.    ;  R0 = used (Int)
  405.  
  406. Service_TerritoryManagerLoaded  *       &64
  407.    ;Entry
  408.    ;  R1 = &64
  409.  
  410. Service_TerritoryStarted        *       &75
  411.    ;Entry
  412.    ;  R1 = &75
  413.  
  414.         ]
  415.         END
  416.