shrink femto.rom a bit, fix sizes

This commit is contained in:
~d6 2022-04-02 23:14:18 -04:00
parent 4ffd80526b
commit c237be7cbc
2 changed files with 5 additions and 4 deletions

View File

@ -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 )

View File

@ -83,7 +83,7 @@
( avoid conficting with the program we're included in. )
( )
( remove this if needed when including it in other projects. )
|2000
( |2000 )
( ERROR HANDLING )