aboutsummaryrefslogtreecommitdiffstats
path: root/src/fortran.h
diff options
context:
space:
mode:
Diffstat (limited to 'src/fortran.h')
-rw-r--r--src/fortran.h24
1 files changed, 24 insertions, 0 deletions
diff --git a/src/fortran.h b/src/fortran.h
new file mode 100644
index 0000000..22c2cd1
--- /dev/null
+++ b/src/fortran.h
@@ -0,0 +1,24 @@
+#define FORT(x) x ## __
+
+#define jwg_create_handle FORT(jwg_create_handle)
+#define jwg_pass_data FORT(jwg_pass_data)
+#define jwg_destroy_data FORT(jwg_destroy_data)
+#define jwg_set_xform FORT(jwg_set_xform)
+#define jwg_set_brush FORT(jwg_set_brush)
+#define jwg_set_pen FORT(jwg_set_pen)
+#define jwg_contour FORT(jwg_contour)
+#define jwg_draw_line FORT(jwg_draw_line)
+#define jwg_draw_polygon FORT(jwg_draw_polygon)
+#define jwg_destroy_handle FORT(jwg_destroy_handle)
+#define jwg_pop_state FORT(jwg_pop_state)
+#define jwg_push_state FORT(jwg_push_state)
+#define jwg_add_xform FORT(jwg_add_xform)
+#define jwg_def_xform FORT(jwg_def_xform)
+#define jwg_add_point FORT(jwg_add_point)
+#define jwg_reset_point FORT(jwg_reset_point)
+#define jwg_close_line FORT(jwg_close_line)
+#define jwg_close_polygon FORT(jwg_close_polygon)
+#define jwg_draw_text FORT(jwg_draw_text)
+#define jwg_set_textcolor FORT(jwg_set_textcolor)
+#define jwg_set_textheight FORT(jwg_set_textheight)
+#define jwg_draw_text_matrix FORT(jwg_draw_text_matrix)