isbpl/errorstream.isbpl

10 lines
147 B
Text
Raw Normal View History

2022-03-05 20:55:03 +01:00
native eputchar
func eputs {
def str _string =str
1 neg =i
while { ( i 1 + =i ) ( i str alen lt ) } {
str i aget eputchar
}
}