implement Sample;include "sys.m"; sys: Sys; Sample: module{ init: fn();}; init(){ sys = load Sys Sys->PATH; a : string; b := "yes"; b[1] = 'E'; sys->print("should print yEs result %s\n", b); a[0] = 112; sys->print("should print p result %s\n", a); a[0] = 'h'; a[len a] = 'e'; a[len a] = 'l'; a[len a] = 'l'; a[len a] = 'o'; sys->print("should print hello result %s\n", a); c := int "65"; sys->print("should print 65 result %d\n", c); h := "Hello"; w := "World"; g := h + " " + w + " " + "!"; sys->print("should print Hello World ! result %s\n", g);}
implement Sample;
include "sys.m";
sys: Sys;
Sample: module
{
init: fn();
};
init()
{
sys = load Sys Sys->PATH;
a : string;
b := "yes";
b[1] = 'E';
sys->print("should print yEs result %s\n", b);
a[0] = 112;
sys->print("should print p result %s\n", a);
a[0] = 'h';
a[len a] = 'e';
a[len a] = 'l';
a[len a] = 'l';
a[len a] = 'o';
sys->print("should print hello result %s\n", a);
c := int "65";
sys->print("should print 65 result %d\n", c);
h := "Hello";
w := "World";
g := h + " " + w + " " + "!";
sys->print("should print Hello World ! result %s\n", g);
}