Make it work under MPW too.

950d47fd · Guido van Rossum · cd57dc3a · 950d47fd
Kaydet (Commit) 950d47fd authored Eki 01, 1994 tarafından Guido van Rossum
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 3 deletions

macsetfiletype.c Mac/Python/macsetfiletype.c +2 -3

No files found.
--- a/Mac/Python/macsetfiletype.c
+++ b/Mac/Python/macsetfiletype.c
@@ -4,8 +4,7 @@
 *
 */
 
-#include <Files.h>
-#include <pascal.h>
+#include "macdefs.h"

 int
 setfiletype(name, creator, type)
@@ -15,7 +14,7 @@ long creator, type;
 	FInfo info;
 	unsigned char *pname;
 	
-	pname = c2pstr(name);
+	pname = (StringPtr) c2pstr(name);
 	if ( GetFInfo(pname, 0, &info) < 0 )
 		return -1;
 	info.fdType = type;