diff Mac/Python/macsetfiletype.c @ 2311:fc6e96221088 legacy-trunk

Added getfiletype routine
author Jack Jansen <jack.jansen@cwi.nl>
date Mon, 13 Feb 1995 11:31:51 +0000
parents 8da03decef59
children d6b292a33cfe
line wrap: on
line diff
--- a/Mac/Python/macsetfiletype.c	Fri Feb 10 17:01:56 1995 +0000
+++ b/Mac/Python/macsetfiletype.c	Mon Feb 13 11:31:51 1995 +0000
@@ -22,3 +22,16 @@
 	return SetFInfo(pname, 0, &info);
 }
 
+long
+getfiletype(name)
+char *name;
+{
+	FInfo info;
+	unsigned char *pname;
+	
+	pname = (StringPtr) Pstring(name);
+	if ( GetFInfo(pname, 0, &info) < 0 )
+		return -1;
+	return info.fdType;
+}
+