Fix problem that could cause cvsup to abort in some cases.
Submitted by: jdp
This commit is contained in:
parent
99e3fb8205
commit
ec72c83800
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=23784
11
lang/modula-3-lib/files/patch-bv
Normal file
11
lang/modula-3-lib/files/patch-bv
Normal 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;
|
||||
|
Loading…
Reference in New Issue
Block a user