SF patch #470393 (Jim Ahlstrom): Add missing marshal function

In Include/, marshal.h declares both
    PyMarshal_ReadLongFromFile()
    and PyMarshal_ReadShortFromFile(),
    but the second is missing from marshal.c.

[Shouldn't the return type be declared as 'short' instead of 'int'?
But 'int' is what was in marshal.h all those years...  --Guido]

Python/marshal.c

@@ -635,6 +635,14 @@ r_object(RFILE *p)
 	}
 }
 
+int
+PyMarshal_ReadShortFromFile(FILE *fp)
+{
+	RFILE rf;
+	rf.fp = fp;
+	return r_short(&rf);
+}
+
 long
 PyMarshal_ReadLongFromFile(FILE *fp)
 {