M TODO.txt => TODO.txt +1 -1
@@ 11,7 11,7 @@ RetroForth/napia :: Todo List
[x] import existing ilo tools
[ ] extend pali to cover napia instruction set
[x] use napia tooling to build the image
- [ ] adapt memory layout to use the full memory space
+ [x] adapt memory layout to use the full memory space
[ ] make use of napia instructions in base image
----------------------------------------------------------------
M forth.pali => forth.pali +13 -13
@@ 5,7 5,7 @@
| '__/ _ \ __| '__/ _ \| |_ / _ \| '__| __| '_ \
| | | __/ |_| | | (_) | _| (_) | | | |_| | | |
|_| \___|\__|_| \___/|_| \___/|_| \__|_| |_|
- for ilo
+ for napia
================================================================
@@ 91,39 91,39 @@ later code using these more readable.
~~~
c set to 1 after the actual start to leave room for a length
c cell
-o 60001
+o 120001
: sys:buffers/block
-o 60126
+o 120126
: sys:buffers/string-eval
-o 61092
+o 121092
: sys:buffers/loops
-o 61105
+o 121105
: sys:buffers/numeric-conversion
-o 61140
+o 121140
: sys:buffers/scope
-o 61142
+o 121142
: sys:buffers/needs
-o 61207
+o 121207
: Sigils
* 128
-o 61336
+o 121336
: sys:buffers/reserved
-o 64378
+o 124378
: sys:buffers/strings+arrays
-o 65407
+o 125407
: sys:buffers/input
-o 65408
+o 125408
: sys:buffers/input/text
-o 65409
+o 125409
: sys:buffers/input/text+1
~~~
M initial.retro => initial.retro +1 -1
@@ 466,7 466,7 @@ will use the most recent one.
:sys:info (-)
'___B: s:put @Block n:put $/ c:put @Blocks n:dec n:put
'___S: s:put depth/data n:put $/ c:put #32 n:put
- '___M: s:put here n:put $/ c:put #59999 n:put nl ;
+ '___M: s:put here n:put $/ c:put #119999 n:put nl ;
~~~
================================================================
M napia.rom => napia.rom +0 -0