define-mult.forth « tests - forth - Forth-like stack-based language

about summary refs log tree commit diff stats

path: root/tests/define-mult.forth

blob: 5b6f798bba90674ffe4c37a47b26a4f628333992 (plain)

INPUT
: multrec over if rot swap over + rot 1 - swap multrec then ;
: mult 0 multrec ;
6 8 mult .
OUTPUT
48