crc/retroforth
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

example updates

Browse source 
FossilOrigin-Name: 20149d1819aa93a0fd469c5ad05031d065bf168a2d47a5c94bd233c71f427a41
This commit is contained in:
crc 2020-02-11 19:30:14 +00:00
parent b0bea1dde3
commit 96ae77edbb
2 changed files with 9 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
example/Marker.retro
View file

@ -7,6 +7,7 @@ to the state it was in prior to the creation of the marker.
:class:marker (a-)
compiling? [ compile:lit &class:marker compile:call ]
[ fetch-next !Dictionary fetch !Heap ] choose ;
:marker (s-) [ @Heap @Dictionary ] dip d:create , , &class:marker reclass ;
~~~

13
example/c-style-comments.retro
View file

@ -1,9 +1,12 @@
Support for comments with embedded spaces; this is useful for quickly
commenting out portions of lines or larger chunks of code during
debugging.
# C Style Comments
This provides for C style /* ... */ comments. It works by patching
`interpret` to make it ignore tokens until the token is */.
This adds support for comments with embedded spaces. It is useful
for quickly commenting out portions of lines or larger chunks of
code during debugging.
Specifically, this provides for C style /* ... */ comments. It
works by patching `interpret` to make it ignore tokens until the
token is `*/`.
~~~
{{