summaryrefslogtreecommitdiffstats
path: root/Mac/Python
diff options
context:
space:
mode:
authorJack Jansen <jack.jansen@cwi.nl>1999-12-12 21:37:14 (GMT)
committerJack Jansen <jack.jansen@cwi.nl>1999-12-12 21:37:14 (GMT)
commit8bb573e2abe5b2f94e36621600ca1187fe78f759 (patch)
treed4badc4456cee5afa8ad978a1ab15630761e6368 /Mac/Python
parent0bdd90a7e7878f451eb4915b0dc4851fac351cc1 (diff)
downloadcpython-8bb573e2abe5b2f94e36621600ca1187fe78f759.zip
cpython-8bb573e2abe5b2f94e36621600ca1187fe78f759.tar.gz
cpython-8bb573e2abe5b2f94e36621600ca1187fe78f759.tar.bz2
Oops, PLstring funcs should be "pascal". Funny this never caused problems before...
Diffstat (limited to 'Mac/Python')
-rw-r--r--Mac/Python/macglue.c12
1 files changed, 9 insertions, 3 deletions
diff --git a/Mac/Python/macglue.c b/Mac/Python/macglue.c
index 4b4c021..117911a 100644
--- a/Mac/Python/macglue.c
+++ b/Mac/Python/macglue.c
@@ -102,6 +102,7 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
/* Declared in macfsmodule.c: */
extern FSSpec *mfs_GetFSSpecFSSpec();
+extern PyObject *newmfssobject Py_PROTO((FSSpec *));
/* Interrupt code variables: */
static int interrupted; /* Set to true when cmd-. seen */
@@ -232,14 +233,14 @@ PyMac_StopGUSISpin() {
** Replacement routines for the PLstr... functions so we don't need
** StdCLib. Moreover, that implementation is broken under cfm68k...
*/
-void
+pascal void
PLstrcpy(to, fr)
unsigned char *to, *fr;
{
memcpy(to, fr, fr[0]+1);
}
-int
+pascal int
PLstrcmp(s1, s2)
unsigned char *s1, *s2;
{
@@ -258,7 +259,7 @@ PLstrcmp(s1, s2)
return 0;
}
-unsigned char *
+pascal unsigned char *
PLstrrchr(str, chr)
unsigned char *str;
unsigned char chr;
@@ -873,6 +874,11 @@ PyMac_GetFSSpec(PyObject *v, FSSpec *fs)
return 1;
}
+/* Convert FSSpec to PyObject */
+PyObject *PyMac_BuildFSSpec(FSSpec *v)
+{
+ return newmfssobject(v);
+}
/* Convert a Python object to a Rect.
The object must be a (left, top, right, bottom) tuple.