Miroirs/retroforth
1
0
Fork 0
mirror of https://git.sr.ht/~crc_/retroforth synced 2024-11-16 19:48:56 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

add describe to easily add descriptions in the source

Browse source 
FossilOrigin-Name: 8f8b7ba14d61c2ff21998f9045d53b47019114f9769a5016048a8a51c1764c42
This commit is contained in:
crc 2024-09-12 18:58:36 +00:00
parent c0cd63c34f
commit 79990effa3
3 changed files with 2606 additions and 2594 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
RELEASE-NOTES
View file

@ -46,6 +46,7 @@
- stack comments & descriptions are now part of the standard - stack comments & descriptions are now part of the standard
system image system image
- add `d:words-missing-details` - add `d:words-missing-details`
- add `describe`
- library - library

5
interface/descriptions.retro
View file

@ -1,6 +1,11 @@
~~~ ~~~
:d:set-description (:ss-) :d:set-description (:ss-)
d:lookup dup n:-zero? [ d:descr &s:keep dip store ] &drop-pair choose ; d:lookup dup n:-zero? [ d:descr &s:keep dip store ] &drop-pair choose ;
'add_a_description_to_a_word 'd:set-description d:set-description
:describe (:s-)
s:keep d:last d:descr store ;
'add_a_description_for_the_most_recently_defined_word describe
~~~ ~~~
~~~ ~~~

5194
vm/nga-c/image.c
View file

File diff suppressed because it is too large Load diff