Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Prefixage gr_draw_text (PR#2503) 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6263 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 2004-04-27 13:50:52 +00:00
parent 9f1a9ce060
commit 419d5c8e81
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
otherlibs/win32graph/draw.c
View File

@ -377,14 +377,14 @@ CAMLprim value caml_gr_draw_char(value chr)
char str[1];
gr_check_open();
str[0] = Int_val(chr);
gr_draw_text((value)str, 1);
caml_gr_draw_text((value)str, 1);
return Val_unit;
}
CAMLprim value caml_gr_draw_string(value str)
{
gr_check_open();
gr_draw_text(str, string_length(str));
caml_gr_draw_text(str, string_length(str));
return Val_unit;
}