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