isbpl/examples/helloworldgen.isbpl

23 lines
449 B
Text
Raw Normal View History

2022-05-13 19:12:38 +02:00
"#stream.isbpl" include
func main {
pop
def id "helloworld.isbpl" STREAM.create.file.out stream =id
def s "func main {\n \"Hello World!\\n\" puts\n 0\n}" _array =s
def i 0 =i
while { i s alen lt } {
( s i aget ) id STREAM.write stream
i inc
}
id STREAM.close stream
"Testing: \n" struppercase puts
"helloworld.isbpl" include
main pop
"TEST DONE\n" strlowercase puts
0
}