mirror of
https://github.com/nineties/planckforth
synced 2024-12-25 21:58:22 +01:00
rename input% to inputstream%
This commit is contained in:
parent
de1c998355
commit
c0def0604b
1 changed files with 2 additions and 2 deletions
|
@ -1473,13 +1473,13 @@ struct
|
|||
cell% field input>next
|
||||
cell% field input>file
|
||||
cell% field input>lineno
|
||||
end-struct input%
|
||||
end-struct inputstream%
|
||||
|
||||
variable input-streams
|
||||
0 input-streams !
|
||||
|
||||
: push-input-stream ( file -- )
|
||||
input% %allot \ addr
|
||||
inputstream% %allot \ addr
|
||||
swap over input>file !
|
||||
0 over input>lineno !
|
||||
input-streams @ over input>next !
|
||||
|
|
Loading…
Reference in a new issue