changeset 1396:4ddb3572fff8

Rodney fixed -U bug
author boisy
date Thu, 02 Oct 2003 17:45:35 +0000
parents 221156025e26
children 921a860c4068
files level1/cmds/asm.asm
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/level1/cmds/asm.asm	Thu Oct 02 12:05:13 2003 +0000
+++ b/level1/cmds/asm.asm	Thu Oct 02 17:45:35 2003 +0000
@@ -2234,9 +2234,9 @@
          bne   L0E63
          lda   #$5F		uppercase-only case mask
          tstb	
-         beq   *+5		"U" flag, force uppercase
+         beq   u.opt		"U" flag, force uppercase
          lda   #$7F		"-U" flag, upper+lower OK
-         sta   <u000D		store new symbol case mask
+u.opt    sta   <u000D		store new symbol case mask
          bra   L0E73
         ENDC
 L0E63    ldb   #22		'opt list' error