# count.b## Written in 2018 by David Boddie <david@boddie.org.uk>## To the extent possible under law, the author(s) have dedicated all copyright# and related and neighboring rights to this software to the public domain# worldwide. This software is distributed without any warranty.## You should have received a copy of the CC0 Public Domain Dedication along with# this software. If not, see <http://creativecommons.org/publicdomain/zero/1.0/>.# A simple loop that prints integers from 0 to 19.implement count;include "sys.m";include "draw.m";count: module{ init: fn(ctxt: ref Draw->Context, args: list of string);};init(ctxt: ref Draw->Context, args: list of string){ sys := load Sys Sys->PATH; sys->print("Counting...\n"); for (i := 0; i < 20; i++) sys->print("%d\n", i);}
# count.b
#
# Written in 2018 by David Boddie <david@boddie.org.uk>
#
# To the extent possible under law, the author(s) have dedicated all copyright
# and related and neighboring rights to this software to the public domain
# worldwide. This software is distributed without any warranty.
#
# You should have received a copy of the CC0 Public Domain Dedication along with
# this software. If not, see <http://creativecommons.org/publicdomain/zero/1.0/>.
# A simple loop that prints integers from 0 to 19.
implement count;
include "sys.m";
include "draw.m";
count: module
{
init: fn(ctxt: ref Draw->Context, args: list of string);
};
init(ctxt: ref Draw->Context, args: list of string)
{
sys := load Sys Sys->PATH;
sys->print("Counting...\n");
for (i := 0; i < 20; i++)
sys->print("%d\n", i);
}