RosettaCodeData/Task/Function-definition/Forth/function-definition.fth

3 lines
66 B
Forth
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
: fmultiply ( F: a b -- F: c ) F* ;
: multiply ( a b -- c ) * ;