a few notes showing equivilents in retro and ans forth

FossilOrigin-Name: 8a3b4337b91d6befd06c31fa8b0926ef342ef09f4480b821fa605f5b57235fdb
This commit is contained in:
crc 2017-10-22 17:35:48 +00:00
parent 305b4dbc42
commit 1b655593ed

View file

@ -0,0 +1,49 @@
# RETRO Cross Reference
Definitions
-----------
RETRO :name ;
ANS : name ;
Numbers
-------
RETRO #100 #-12
ANS 100 -12
Characters
----------
RETRO $A $D
ANS CHAR A CHAR D
RETRO :foo $A ;
ANS : foo [CHAR] A ;
Comments
--------
RETRO (This_is_a_comment)
ANS ( This is a comment )
Pointers
--------
RETRO &Compiler
ANS ' Compiler
RETRO :foo &Heap ;
ANS : foo ['] Heap ;
Conditionals
------------
RETRO (flag) [ 'TRUE ] if
ANS ( flag ) IF s" TRUE" THEN
RETRO (flag) [ 'FALSE ] -if
ANS ( flag ) NOT IF s" FALSE" THEN
RETRO (flag) [ 'TRUE ] [ 'FALSE ] choose
ANS ( flag ) IF s" TRUE" ELSE s" FALSE" THEN
RETRO conditionals can be used outside of definitions, ANS ones can not.