isbpl/errorstream.isbpl

native eputchar

func eputs {
    def str _array =str 
    def i 1 neg =i
    while { ( i 1 + =i ) ( i str alen lt ) } {
        str i aget eputchar
    }
}