mirror of
https://github.com/PDP-10/its.git
synced 2026-05-04 15:16:32 +00:00
Add $. to exec DDT.
This commit is contained in:
@@ -1289,7 +1289,14 @@ POW2: LSH W2,-1
|
|||||||
JUMPE W2,L4
|
JUMPE W2,L4
|
||||||
SOJA W1,POW2
|
SOJA W1,POW2
|
||||||
|
|
||||||
PERIOD: MOVE T,LLOC
|
GETPC: SKIPN T,ALTPC
|
||||||
|
JRST [HRRZ T,BCOM ? SOS T ? JRST .+1]
|
||||||
|
AOS (P)
|
||||||
|
POPJ P,
|
||||||
|
|
||||||
|
PERIOD: TLNE F,CF
|
||||||
|
PUSHJ P,GETPC
|
||||||
|
MOVE T,LLOC
|
||||||
TLNE F,SF ;SYLLABLE STARTED
|
TLNE F,SF ;SYLLABLE STARTED
|
||||||
MOVE T,DEN
|
MOVE T,DEN
|
||||||
MOVEM T,SYL
|
MOVEM T,SYL
|
||||||
Reference in New Issue
Block a user