isbpl/helloworldgen.isbpl

23 lines
449 B
Text
Raw Normal View History

"#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
2022-03-06 20:07:48 +01:00
"Testing: \n" struppercase puts
"helloworld.isbpl" include
main pop
2022-03-06 20:07:48 +01:00
"TEST DONE\n" strlowercase puts
0
}