Olaf Hering
ca063cba5b
add curses.const.patch ad curses.getsyx.patch OBS-URL: https://build.opensuse.org/package/show/devel:languages:ocaml/ocaml-curses?expand=0&rev=13
12 lines
271 B
Diff
12 lines
271 B
Diff
--- a/ml_curses.c
|
|
+++ b/ml_curses.c
|
|
@@ -74,7 +74,7 @@
|
|
Store_field(ret,2,Val_int(z)); \
|
|
CAMLreturn(ret); }
|
|
#define r_string(f) \
|
|
- { char *ret=f; \
|
|
+ { const char *ret=f; \
|
|
if(ret==NULL) failwith("Null pointer"); \
|
|
CAMLreturn(copy_string(ret)); }
|
|
|