Mercurial > hg > Members > kono > nitros9-code
changeset 2792:8212aec53a14 lwtools-port
Fixed to assemble properly
| author | Boisy Pitre <boisy.pitre@nuance.com> |
|---|---|
| date | Sun, 27 Jan 2013 12:09:23 -0600 |
| parents | 0df4a4590bc6 |
| children | a124f282f759 |
| files | lib/drivewire.as lib/os9.as lib/rbf.as lib/scf.as |
| diffstat | 4 files changed, 15 insertions(+), 14 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/drivewire.as Sun Jan 27 10:41:30 2013 -0600 +++ b/lib/drivewire.as Sun Jan 27 12:09:23 2013 -0600 @@ -1,4 +1,4 @@ - section .data + section _constant RMB $81 SS.Timer: RMB 1 Timer service SS.EE: RMB 1 EEPROM service
--- a/lib/os9.as Sun Jan 27 10:41:30 2013 -0600 +++ b/lib/os9.as Sun Jan 27 12:09:23 2013 -0600 @@ -242,6 +242,7 @@ ******************* * File Access Modes * + section _constant READ.: EQU %00000001 WRITE.: EQU %00000010 UPDAT.: EQU READ.+WRITE. @@ -252,6 +253,7 @@ SHARE.: EQU %01000000 DIR.: EQU %10000000 ISIZ.: EQU %00100000 + endsect ************** * Signal Codes @@ -731,7 +733,6 @@ KeyRptS: RMB 1 Key repeat start constant KeyRptD: RMB 1 Key repeat delay constant ENDC - endsect * Feature1 byte definitions CRCOn: EQU %00000001 CRC checking on @@ -812,6 +813,7 @@ * CRCCon1: EQU $80 CRCCon23: EQU $0FE3 + endsect TTL Process Information PAG @@ -1037,14 +1039,15 @@ Vi.Rst: RMB 2 reset value for counter Vi.Stat: RMB 1 status byte Vi.PkSz: EQU * - endsect Vi.IFlag: EQU %00000001 status byte virq flag + endsect PAG ************************************* * Machine Characteristics Definitions * + section _constant R$CC: EQU 0 Condition Codes register R$A: EQU 1 A Accumulator R$B: EQU 2 B Accumulator @@ -1084,6 +1087,7 @@ Carry: EQU %00000001 Carry bit IntMasks: EQU IRQMask+FIRQMask Sign: EQU %10000000 sign bit + endsect TTL Error Code Definitions PAG
--- a/lib/rbf.as Sun Jan 27 10:41:30 2013 -0600 +++ b/lib/rbf.as Sun Jan 27 12:09:23 2013 -0600 @@ -1,7 +1,3 @@ - IFNE RBFDEFS-1 - -RBFDEFS SET 1 - ******************************************************************** * RBFDefs - Random Block File Manager Definitions * @@ -370,5 +366,3 @@ DRVMEM: EQU * endsect - ENDC -
--- a/lib/scf.as Sun Jan 27 10:41:30 2013 -0600 +++ b/lib/scf.as Sun Jan 27 12:09:23 2013 -0600 @@ -45,7 +45,7 @@ * * These definitions are for SCF device descriptors. - section constant + section _constant RMB M$DTyp IT.DVC: RMB 1 Device type (DT.SCF) IT.UPC: RMB 1 Uppercase flag @@ -97,7 +97,7 @@ * * SCF devices must reserve this space for SCF * - section constant + section _constant RMB V.USER V.TYPE: RMB 1 Device type or parity V.LINE: RMB 1 Lines left until end of page @@ -121,6 +121,7 @@ *********************** * Character Definitions * + section _constant C$NULL: SET 0 Null char C$RPET: SET $01 (CTRL-A - SOH) Repeat last input line C$INTR: SET $03 (CTRL-C - ETX) Keyboard interrupt @@ -154,6 +155,7 @@ C$SPAC: SET $20 Space C$PERD: SET '. C$COMA: SET ', + endsect PAG ********************************************* @@ -163,7 +165,7 @@ * via the I$Open system call (processed by IOMan). Process * descriptors track state information of a path. * - section constant + section _constant RMB PD.FST PD.DV2: RMB 2 Output device table pointer PD.RAW: RMB 1 Read/Write or ReadLn/WritLn mode @@ -173,7 +175,7 @@ PD.STM: RMB 2 Reserved for status routine endsect - section constant + section _constant RMB PD.OPT RMB 1 Device type PD.UPC: RMB 1 Case (0=both, 1=upper only) @@ -205,7 +207,6 @@ PD.TBL: RMB 2 Device table addr (copy) PD.PLP: RMB 2 Path Descriptor List Pointer PD.PST: RMB 1 Current path status - endsect * PD.PST values Path Descriptor Status byte * @@ -241,3 +242,5 @@ * Stop bits STOP1: EQU %00000000 STOP2: EQU %00010000 + endsect +