allow Read32FromFile to return signed value

[debian/pforth] / csrc / pf_save.c

diff --git a/csrc/pf_save.c b/csrc/pf_save.c
index d46958ae5e778456a45cd9a02e11135f3829e0b5..80b4c1e5d9853ec268d438c62db6c419aedbb2b3 100644 (file)
--- a/csrc/pf_save.c
+++ b/csrc/pf_save.c
@@ -513,7 +513,7 @@ error:
 #ifndef PF_NO_FILEIO\r
 \r
 /***************************************************************/\r
-static uint32_t Read32FromFile( FileStream *fid, uint32_t *ValPtr )\r
+static int32_t Read32FromFile( FileStream *fid, uint32_t *ValPtr )\r
 {\r
        int32_t numr;\r
        uint8_t pad[4];\r