diff --git a/README.md b/README.md index fa8b639..b299cd7 100644 --- a/README.md +++ b/README.md @@ -126,4 +126,6 @@ Thanks go out to my current and past patrons: - Eli - Brad S - Tobias Ammann +- oneearedrabbit +- Octavio Turra diff --git a/RELEASE-NOTES b/RELEASE-NOTES index 16a1731..03d466b 100644 --- a/RELEASE-NOTES +++ b/RELEASE-NOTES @@ -4,9 +4,9 @@ | | | __/ |_| | | (_) | _| (_) | | | |_| | | | |_| \___|\__|_| \___/|_| \___/|_| \__|_| |_| for nga -# RetroForth/nga 2023.2 Release Notes +# RetroForth/nga 2023.3 Release Notes ----------------------------------------------------------------- +================================================================ * no longer display warning on files with only test blocks (#87) * added `script:current-line-text` (#85) @@ -18,5 +18,9 @@ * mem: now requires 64-bit (rick c) * block: words now use block storage device * fll: vocabulary added (arland) +* added string deduplication (`s:dedup`) +* added new `a:` words: `a:first`, `a:last`, `a:temp`, `a:hash`, + `a:indices`, `a:indices/string` +* optional use of hashed dictionary name lookups ----------------------------------------------------------------- +================================================================ diff --git a/image/build.retro b/image/build.retro index bf329b8..f1d4a99 100644 --- a/image/build.retro +++ b/image/build.retro @@ -1,3 +1,3 @@ ~~~ -#12 'BUILD const +#13 'BUILD const ~~~ diff --git a/image/retro.muri b/image/retro.muri index ff0c22d..9772c9d 100644 --- a/image/retro.muri +++ b/image/retro.muri @@ -1,4 +1,4 @@ -# RETRO Core 2023.1 +# RETRO Core 2023.3 RETRO Core is a minimal Forth implementation for the Nga virtual machine. Like Nga this is intended to be used within @@ -149,7 +149,7 @@ r 9999 d 1536 : Version -d 202301 +d 202303 : references r interpret diff --git a/ngaImage b/ngaImage index f75b6f3..e0fb755 100644 Binary files a/ngaImage and b/ngaImage differ diff --git a/vm/nga-c/image.c b/vm/nga-c/image.c index ef8185e..07fe416 100644 --- a/vm/nga-c/image.c +++ b/vm/nga-c/image.c @@ -11,7 +11,7 @@ #endif #endif CELL ngaImageCells = 20101; -CELL ngaImage[] = { 1793,19598,20056,20100,202301,417,389,1249,1535,0,11254,0,10,1,10,2,10,3,10, +CELL ngaImage[] = { 1793,19598,20056,20100,202303,417,389,1249,1535,0,11254,0,10,1,10,2,10,3,10, 4,10,5,10,6,10,7,10,8,10,11,10,12,10,13,10,14,10,15,10, 16,10,17,10,18,10,19,10,20,10,21,10,22,10,23,10,24,10,25,68223234, 1,2575,85000450,1,656912,163,180,268505089,65,64,285281281,0,65,2063,10,101384453,0,9,10,68485378, @@ -574,7 +574,7 @@ CELL ngaImage[] = { 1793,19598,20056,20100,202301,417,389,1249,1535,0,11254,0,10 115,116,101,110,0,2049,11148,2049,11035,1,417,1,17,2049,66,1,11204,7,10,11192, 11239,156,12041,-213800119713087686,100,58,72,97,115,104,45,70,117,110,99,116,105,111,110,0, 4875,11218,11254,168,12041,7572226109254526,100,58,114,101,104,97,115,104,0,1793,11272,1793,11264,2049, - 190,3841,11239,8,10,1,11258,2049,2241,2049,188,16,10,1,11256,2049,8491,10,11240,12, + 190,3841,11239,8,10,1,11258,2049,2241,2049,188,16,10,1,11256,2049,8491,10,11240,13, 156,0,210668957237,66,85,73,76,68,0,11277,11299,168,0,210709067314,99,111,109,109,97,0, 2049,130,10,11288,11312,168,0,6385123288,99,111,110,115,0,2049,1977,1793,11322,4,2049,11299, 2049,11299,10,1,11316,2049,2229,10,11302,11336,168,0,193488123,99,97,114,0,10,11327,11346,