(bind-func replace_all (lambda (orig:String* rep:i8* with:String*) (replace_all:[String*,i8*,i8*,i8*]* (cstring orig) rep (cstring with))))