mirror of
https://github.com/forth-ev/VolksForth.git
synced 2024-11-21 14:31:21 +00:00
Remove unneeded mk-tmp-heap from x16tmpheap.fth
This commit is contained in:
parent
832f03b9ea
commit
a710214576
@ -19,9 +19,6 @@ User ]tmpheap
|
||||
\ X16 KERNAL. The banked RAM lives from $a000 to $bfff.
|
||||
1 $9f61 c! $a000 tmpheap[ ! $c000 dup ]tmpheap ! tmpheap> !
|
||||
|
||||
: mk-tmp-heap ( size -- )
|
||||
heap dup ]tmpheap ! tmpheap> ! hallot heap tmpheap[ ! ;
|
||||
|
||||
: tmp-hallot ( size -- addr )
|
||||
tmpheap> @ swap -
|
||||
dup tmpheap[ @ u< abort" tmp heap overflow"
|
||||
|
Loading…
Reference in New Issue
Block a user