Fix problem that could cause cvsup to abort in some cases.

Submitted by:	jdp
This commit is contained in:
Satoshi Asami 1999-12-16 08:11:01 +00:00
parent 99e3fb8205
commit ec72c83800
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=23784

View File

@ -0,0 +1,11 @@
--- m3/m3core/src/float/Common/DragonInt.m3.orig Fri Jul 7 13:26:16 1995
+++ m3/m3core/src/float/Common/DragonInt.m3 Wed Dec 15 09:17:34 1999
@@ -421,7 +421,7 @@
t.s := n_words;
t.w := s.next;
INC (s.next, n_words);
- IF (s.next > NUMBER (s.w^)) THEN Expand (s); END;
+ IF (s.next >= NUMBER (s.w^)) THEN Expand (s); END;
RETURN ADR (s.w[t.w]);
END InitValue;