diff options
author | Jack Jansen <jack.jansen@cwi.nl> | 1999-12-12 21:37:14 (GMT) |
---|---|---|
committer | Jack Jansen <jack.jansen@cwi.nl> | 1999-12-12 21:37:14 (GMT) |
commit | 8bb573e2abe5b2f94e36621600ca1187fe78f759 (patch) | |
tree | d4badc4456cee5afa8ad978a1ab15630761e6368 /Mac/Python | |
parent | 0bdd90a7e7878f451eb4915b0dc4851fac351cc1 (diff) | |
download | cpython-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.c | 12 |
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. |