diff options
author | Olivier Andrieu <oandrieu@gmail.com> | 2005-12-13 22:31:26 +0000 |
---|---|---|
committer | Hezekiah M. Carty <hcarty@atmos.umd.edu> | 2009-06-18 14:00:40 -0400 |
commit | 5c60f6ae2ea0a56413d13c57598ca142e25448d7 (patch) | |
tree | eaaf226c8b52d50b5a1265a40fd1e24cff059196 | |
parent | 12d3168e43f7fa9f9554b2f01dd88b5b171f6187 (diff) |
Add Cairo_ps.set_dpi
* src/cairo_ps.mli, src/cairo_ps.mli, src/ml_cairo_ps.c: add Cairo_ps.set_dpi
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | src/cairo_ps.ml | 4 | ||||
-rw-r--r-- | src/cairo_ps.mli | 4 | ||||
-rw-r--r-- | src/ml_cairo_ps.c | 4 |
4 files changed, 11 insertions, 6 deletions
@@ -1,3 +1,8 @@ +2005-12-13 Olivier Andrieu <oliv__a@users.sourceforge.net> + + * src/cairo_ps.mli, src/cairo_ps.mli, src/ml_cairo_ps.c: add + Cairo_ps.set_dpi + 2005-11-03 Olivier Andrieu <oliv__a@users.sourceforge.net> * configure.ac: require cairo 1.0, bump version number to 1.0 diff --git a/src/cairo_ps.ml b/src/cairo_ps.ml index 9718257..01448ea 100644 --- a/src/cairo_ps.ml +++ b/src/cairo_ps.ml @@ -27,5 +27,5 @@ external surface_create_for_stream : width_in_points:float -> height_in_points:float -> surface = "ml_cairo_ps_surface_create_for_stream" -(* external set_dpi : *) -(* [> `PS] Cairo.surface -> x_dpi:float -> y_dpi:float -> unit = "ml_cairo_ps_surface_set_dpi" *) +external set_dpi : + [> `PS] Cairo.surface -> x_dpi:float -> y_dpi:float -> unit = "ml_cairo_ps_surface_set_dpi" diff --git a/src/cairo_ps.mli b/src/cairo_ps.mli index da8b0f0..1f0f709 100644 --- a/src/cairo_ps.mli +++ b/src/cairo_ps.mli @@ -20,5 +20,5 @@ external surface_create_for_stream : width_in_points:float -> height_in_points:float -> surface = "ml_cairo_ps_surface_create_for_stream" -(* external set_dpi : *) -(* [> `PS] Cairo.surface -> x_dpi:float -> y_dpi:float -> unit = "ml_cairo_ps_surface_set_dpi" *) +external set_dpi : + [> `PS] Cairo.surface -> x_dpi:float -> y_dpi:float -> unit = "ml_cairo_ps_surface_set_dpi" diff --git a/src/ml_cairo_ps.c b/src/ml_cairo_ps.c index 26c49ba..2340ce3 100644 --- a/src/ml_cairo_ps.c +++ b/src/ml_cairo_ps.c @@ -39,12 +39,12 @@ ml_cairo_ps_surface_create_for_stream (value f, value w, value h) return _ml_cairo_ps_surface_create_for_stream (f, w, h, 0); } -/* ML_3(cairo_ps_surface_set_dpi, cairo_surface_t_val, Double_val, Double_val, Unit) */ +wML_3(cairo_ps_surface_set_dpi, cairo_surface_t_val, Double_val, Double_val, Unit) #else Cairo_Unsupported(cairo_ps_surface_create_for_stream_unsafe, "PS backend not supported"); Cairo_Unsupported(cairo_ps_surface_create_for_stream, "PS backend not supported"); -/* Cairo_Unsupported(cairo_ps_surface_set_dpi, "PS backend not supported"); */ +Cairo_Unsupported(cairo_ps_surface_set_dpi, "PS backend not supported"); #endif |