From 9611c053041139ed398a9153877c42968caf4dfe Mon Sep 17 00:00:00 2001 From: henesy Date: Tue, 26 Feb 2019 10:39:13 -0600 Subject: add Loops --- Loops/loops.b | 39 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100644 Loops/loops.b (limited to 'Loops/loops.b') diff --git a/Loops/loops.b b/Loops/loops.b new file mode 100644 index 0000000..a129e6f --- /dev/null +++ b/Loops/loops.b @@ -0,0 +1,39 @@ +implement Loops; + +include "sys.m"; +include "draw.m"; + +sys: Sys; +print: import sys; + +Loops: module { + init: fn(nil: ref Draw->Context, nil: list of string); +}; + +init(nil: ref Draw->Context, nil: list of string) { + sys = load Sys Sys->PATH; + + print("== for\n"); + + for(i := 0; i < 10; i++){ + if(i % 2 == 0) + continue; + + print("%d\n", i * i); + } + + print("== while\n"); + + n := 7; + while(n) + print("%d\n", n--); + + print("== do\n"); + + do{ + print("%d\n", ++n); + break; + }while(1); + + exit; +} -- cgit v1.2.3