1 # When disallowing built-in names, we have to treat GET and PUT 2 # specially, so when parsing the special register operand we do 3 # not use the symbol table. 4 rJ IS 20 5 Main GET $5,rJ 6 GET $6,:rJ 7 PUT rJ,$7 8 PUT :rJ,$8 9