Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
29
Task/Memory-allocation/Retro/memory-allocation.retro
Normal file
29
Task/Memory-allocation/Retro/memory-allocation.retro
Normal file
|
|
@ -0,0 +1,29 @@
|
|||
display total memory available
|
||||
|
||||
~~~
|
||||
EOM n:put
|
||||
~~~
|
||||
|
||||
display unused memory
|
||||
|
||||
~~~
|
||||
EOM here - n:put
|
||||
~~~
|
||||
|
||||
display next free address
|
||||
|
||||
~~~
|
||||
here n:put
|
||||
~~~
|
||||
|
||||
allocate 1000 cells
|
||||
|
||||
~~~
|
||||
#1000 allot
|
||||
~~~
|
||||
|
||||
free 500 cells
|
||||
|
||||
~~~
|
||||
#-500 allot
|
||||
~~~
|
||||
Loading…
Add table
Add a link
Reference in a new issue