X-Git-Url: http://git.pond.sub.org/?p=empserver;a=blobdiff_plain;f=src%2Flib%2Fcommon%2Fxundump.c;h=74a274caa85cde5b031b3fefb495d0bccb474e46;hp=652e59c94d1dd01a12a9b0ec0acca0575d97b6cb;hb=5cedc533f80adc26848b480dec287e993489ef25;hpb=50070a8f9a6af9dbf2c2317d80848a39d03bc858

diff --git a/src/lib/common/xundump.c b/src/lib/common/xundump.c
index 652e59c94..74a274caa 100644
--- a/src/lib/common/xundump.c
+++ b/src/lib/common/xundump.c
@@ -523,8 +523,11 @@ setnum(int fldno, double dbl)
     /*
      * If this is the record index, put it into cur_id.
      */
-    if (fldno == 0 && ca->ca_table == cur_type)
+    if (fldno == 0 && ca->ca_table == cur_type) {
+	if (dbl < 0 || (int)dbl != dbl)
+	    return gripe("Field %d can't hold this value", fldno + 1);
 	cur_id = (int)dbl;
+    }
 
     memb_ptr = getobj();
     if (!memb_ptr)