shrink femto.rom a bit, fix sizes
This commit is contained in:
parent
4ffd80526b
commit
c237be7cbc
|
@ -52,6 +52,8 @@
|
|||
|10 @Console [ &vector $2 &read $1 &pad $5 &write $1 &error $1 ]
|
||||
|a0 @File [ &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 ]
|
||||
|
||||
( MAX file size is currently #c950, i.e. 51536 bytes )
|
||||
|
||||
%dbg { #ff .System/debug DEO }
|
||||
%emit { .Console/write DEO }
|
||||
%sp { #2018 DEO }
|
||||
|
@ -194,7 +196,7 @@
|
|||
|
||||
@open-file ( filename* -> )
|
||||
.File/name DEO2
|
||||
#f000 .File/length DEO2
|
||||
#c950 .File/length DEO2
|
||||
;data .File/read DEO2
|
||||
|
||||
.File/success DEI2 #0000 GTH2 ,&ok JCN
|
||||
|
@ -1306,5 +1308,4 @@
|
|||
]
|
||||
|
||||
@filename $80 ( path to file being edited )
|
||||
|
||||
@data $f000 ( actual file data to be edited )
|
||||
@data $c950 ( actual file data to be edited )
|
||||
|
|
Loading…
Reference in New Issue