From ce1d44b308150c88ee61c819ed4b2242af4fcf14 Mon Sep 17 00:00:00 2001 From: HorseMD Date: Fri, 14 Nov 2014 12:12:30 +0000 Subject: [PATCH] Use our word 'square' in the loop example word 'squares'. --- forth.html.markdown | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/forth.html.markdown b/forth.html.markdown index 0521a3ab..25a9f3b8 100644 --- a/forth.html.markdown +++ b/forth.html.markdown @@ -70,9 +70,10 @@ Forth, but most of what is written here should work elsewhere. \ The `:` word sets Forth into compile mode until it sees the `;` word. : square ( n -- n ) dup * ; \ ok +5 square . \ 25 ok \ We can view what a word does too: -see square \ dup * ; ok +see square \ : square dup * ; ok \ -------------------------------- Conditionals -------------------------------- @@ -109,7 +110,7 @@ one-to-12 \ 0 1 2 3 4 5 6 7 8 9 10 11 12 ok \ `?do` works similarly, except it will skip the loop if the end and start \ numbers are equal. -: squares ( n -- ) 0 ?do i dup * . loop ; \ ok +: squares ( n -- ) 0 ?do i square . loop ; \ ok 10 squares \ 0 1 4 9 16 25 36 49 64 81 ok \ Change the "step" with `+loop`: