1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-27 05:58:05 +11:00
collapseos/blk/416

13 lines
274 B
Plaintext
Raw Normal View History

( n -- Fetches block n and write it to BLK( )
2020-05-15 04:49:16 +10:00
: BLK@* 0x34 RAM+ ;
( n -- Write back BLK( to storage at block n )
2020-05-15 04:49:16 +10:00
: BLK!* 0x36 RAM+ ;
( Current blk pointer in ( )
2020-05-15 04:49:16 +10:00
: BLK> 0x38 RAM+ ;
( Whether buffer is dirty )
2020-05-15 04:49:16 +10:00
: BLKDTY 0x3a RAM+ ;
: BLK( 0x3c RAM+ @ ;
: BLK) BLK( 1024 + ;
2020-04-26 11:54:07 +10:00