From fa4d5d0414da24c2fa4ffc617ed6ee2d33c3ddd2 Mon Sep 17 00:00:00 2001
From: Jack Jansen <jack.jansen@cwi.nl>
Date: Wed, 15 Nov 1995 15:19:29 +0000
Subject: [PATCH] Added converters for Fixed

---
 Mac/Include/macglue.h |  2 ++
 Mac/Python/macglue.c  | 23 +++++++++++++++++++++++
 2 files changed, 25 insertions(+)

diff --git a/Mac/Include/macglue.h b/Mac/Include/macglue.h
index 3a51101abb9..9213f2f33f6 100644
--- a/Mac/Include/macglue.h
+++ b/Mac/Include/macglue.h
@@ -80,4 +80,6 @@ PyObject *PyMac_BuildPoint(Point);		/* Convert Point to PyObject */
 int PyMac_GetEventRecord(PyObject *, EventRecord *); /* argument parser for EventRecord */
 PyObject *PyMac_BuildEventRecord(EventRecord *); /* Convert EventRecord to PyObject */
 
+int PyMac_GetFixed(PyObject *, Fixed *);	/* argument parser for Fixed */
+PyObject *PyMac_BuildFixed(Fixed);			/* Convert Fixed to PyObject */
 void PyMac_InitApplet(void);			/* Initialize and run an Applet */
diff --git a/Mac/Python/macglue.c b/Mac/Python/macglue.c
index 2528e2538c8..23415eb8b5c 100644
--- a/Mac/Python/macglue.c
+++ b/Mac/Python/macglue.c
@@ -734,3 +734,26 @@ PyMac_BuildEventRecord(EventRecord *e)
 	                     e->where.v,
 	                     e->modifiers);
 }
+
+/* Convert Python object to Fixed */
+int
+PyMac_GetFixed(PyObject *v, Fixed *f)
+{
+	double d;
+	
+	if( !PyArg_Parse(v, "d", &d))
+		return 0;
+	*f = (Fixed)(d * 0x10000);
+}
+
+/* Convert a Point to a Python object */
+PyObject *
+PyMac_BuildFixed(Fixed f)
+{
+	double d;
+	
+	d = f;
+	d = d / 0x10000;
+	return Py_BuildValue("d", d);
+}
+