Mercurial > hg > Members > kono > nitros9-code
diff level2/modules/pipeman_named.asm @ 2114:ac2f5aa71f93
made certain pseudo-ops uppercase
author | boisy |
---|---|
date | Wed, 22 Aug 2007 02:22:41 +0000 |
parents | 46c68f878889 |
children | db97356e3648 |
line wrap: on
line diff
--- a/level2/modules/pipeman_named.asm Tue Aug 21 19:06:40 2007 +0000 +++ b/level2/modules/pipeman_named.asm Wed Aug 22 02:22:41 2007 +0000 @@ -113,10 +113,10 @@ * * Global equates * - ifp1 + IFP1 use defsfile use pipedefs - endc + ENDC * * Local Equates @@ -444,7 +444,7 @@ NewPipe ldy 10,S ;Get PD pointer - ifeq (PIPEDIR-YESDIR) + IFEQ (PIPEDIR-YESDIR) lda PD.MOD,Y ;Check pipe attributes bita #DIR. beq NEWP1 @@ -453,7 +453,7 @@ lbsr SizDirP * beq XYZZY ;Special if no pipes created - endc + ENDC * Normal (non-dir) processing @@ -639,7 +639,7 @@ * Update IOMAN variables. * Reg-Y = where IOMAN thinks the PD is. - ifeq (CAUTION-CAREFUL) + IFEQ (CAUTION-CAREFUL) cmpy (14+IOMAGIC),S ;Make sure the stack looks right (PD matches) beq OKMagic @@ -649,7 +649,7 @@ ldb #E$Bug leas 14,S rts - endc + ENDC * Stack is right; go fix PD pointers @@ -678,7 +678,7 @@ sta PD.CNT,Y ;Get rid of any artificial openings clr PD.Keep,Y - ifeq (PIPEDIR-YESDIR) + IFEQ (PIPEDIR-YESDIR) * Handle prefill of pipe directory buffer lda PD.Mod,Y ;Is this a DIR. open? @@ -686,7 +686,7 @@ beq OpnXt2 lbsr FilDirP ;Send directory info to pipe - endc + ENDC OpnXt2 ldu 12,S ;Point at caller's registers ldd 4,S ;Get revised path name pointer @@ -1079,7 +1079,7 @@ * Not SS.EOF. Check for SS.FD - ifeq (PIPEDIR-YESDIR) + IFEQ (PIPEDIR-YESDIR) NotSSEOF cmpa #SS.FD bne NotSSFD @@ -1087,9 +1087,9 @@ lbsr DoSSFD bra G.OK ;Successful always - else + ELSE NotSSEOF equ * - endc + ENDC * Not SS.FD. Check for SS.ScSiz @@ -1694,7 +1694,7 @@ rts - ifeq (PIPEDIR-YESDIR) + IFEQ (PIPEDIR-YESDIR) * * Find out how many pipes there are for the @@ -1854,7 +1854,7 @@ leas (16+5),S puls U,X,Y,D,PC - endc + ENDC emod