Handbook
Glossary
write-register
Vocabulary
gml
.
runtime
Definition
USING:
math
strings
;
IN:
gml.runtime
TUPLE:
write-register
{
name
string
initial:
""
}
{
n
fixnum
initial:
0
}
;
Methods
USING:
accessors
gml.runtime
sequences
;
M::
write-register
(exec)
( registers gml obj -- registers gml )
gml
pop-operand
obj
n>>
registers
set-nth
registers gml
;
USING:
accessors
gml.printer
gml.runtime
io
;
M:
write-register
write-gml
"!"
write
name>>
write
;