Sign in
go
/
website
/
feb9e77f0d94038e38181bdfcd6514a2d118c563
/
.
/
_content
/
talks
/
2016
/
asm
/
pdp11.s.txt
blob: 19920551b5611e099c18c9f9519d82d0f434fa69 [
file
] [
log
] [
blame
]
/ a3 -- pdp-11 assembler pass 1
assem:
jsr pc,readop
jsr pc,checkeos
br ealoop
tst ifflg
beq 3f
cmp r4,$200
blos assem
cmpb (r4),$21 /if
bne 2f
inc ifflg
2:
cmpb (r4),$22 /endif
bne assem
dec ifflg
br assem