8 lines
145 B
Text
8 lines
145 B
Text
|
[ "R" file.open
|
||
|
|
dup 0 <> [ dup file.size . file.close ] ifTrue
|
||
|
|
drop
|
||
|
|
] is display-size
|
||
|
|
|
||
|
|
" input.txt" display-size
|
||
|
|
" /input.txt" display-size
|