]> git.pld-linux.org Git - packages/ocaml.git/blame - ocaml-tk85support.patch
- CFLAGS fixes (5 sed invokations replaced with patch)
[packages/ocaml.git] / ocaml-tk85support.patch
CommitLineData
93ce37a6
MM
1--- ocaml-3.08.3/otherlibs/labltk/support/cltkImg.c.orig 2005-05-02 17:37:05.485370160 +0000
2+++ ocaml-3.08.3/otherlibs/labltk/support/cltkImg.c 2005-05-02 17:45:33.717107192 +0000
3@@ -98,7 +98,11 @@
4 pib.offset[0] = 0;
5 pib.offset[1] = 1;
6 pib.offset[2] = 2;
7- Tk_PhotoPutBlock(ph,&pib,Int_val(x),Int_val(y),Int_val(w),Int_val(h)
8+ Tk_PhotoPutBlock(
9+#if (TK_MAJOR_VERSION == 8 && TK_MINOR_VERSION >= 5 || TK_MAJOR_VERSION > 8)
10+ NULL,
11+#endif
12+ ph,&pib,Int_val(x),Int_val(y),Int_val(w),Int_val(h)
13 #if (TK_MAJOR_VERSION == 8 && TK_MINOR_VERSION >= 4 || TK_MAJOR_VERSION > 8)
14 , TK_PHOTO_COMPOSITE_SET
15 #endif
16--- ocaml-3.08.3/otherlibs/labltk/tkanim/tkAnimGIF.c.orig 2005-05-02 17:53:48.000000000 +0000
17+++ ocaml-3.08.3/otherlibs/labltk/tkanim/tkAnimGIF.c 2005-05-02 17:53:33.000000000 +0000
18@@ -334,7 +334,11 @@
19 goto error;
20 }
21 }
22- Tk_PhotoPutBlock(photoHandle, &block, 0, 0, imageWidth, imageHeight
23+ Tk_PhotoPutBlock(
24+#if (TK_MAJOR_VERSION == 8 && TK_MINOR_VERSION >= 5 || TK_MAJOR_VERSION > 8)
25+ NULL,
26+#endif
27+ photoHandle, &block, 0, 0, imageWidth, imageHeight
28 #if (TK_MAJOR_VERSION == 8 && TK_MINOR_VERSION >= 4 || TK_MAJOR_VERSION > 8)
29 , TK_PHOTO_COMPOSITE_SET
30 #endif
This page took 0.027264 seconds and 4 git commands to generate.