Follow-up Comment #2, bug #63038 (project gforth):
Fix working :-)
But the '+' in code of 3+ is not visible by 'see 3+' (simple '4+' for
comparison):
sr@rs:~/Gforth$ cat t_curry.fs
: curry+ ( n1 "name" -- )
1 0 CONST-DOES> ( n2 -- n1+n2 )
+ ;
3 curry+ 3+
: 4+ #4 + ;
see 3+
see 4+
cr
3 3+ .
4 4+ .
cr
sr@rs:~/Gforth$ gforth t_curry.fs
: 3+ #3
;
: 4+
#4 + ;
6 8
Gforth 0.7.9_20220901
Authors: Anton Ertl, Bernd Paysan, Jens Wilke et al., for more type `authors'
...
_______________________________________________________
Reply to this item at:
<https://savannah.gnu.org/bugs/?63038>
_______________________________________________
Message sent via Savannah
https://savannah.gnu.org/