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