LargeInteger.st
changeset 4286 2cfcccd2f1ca
parent 4284 20f47ad19322
child 4291 8939797eeb6e
--- a/LargeInteger.st	Wed Jun 09 15:44:35 1999 +0200
+++ b/LargeInteger.st	Wed Jun 09 16:29:42 1999 +0200
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+'From Smalltalk/X, Version:3.5.2 on 26-may-1999 at 12:02:16'                    !
+
 Integer subclass:#LargeInteger
 	instanceVariableNames:'sign digitByteArray'
 	classVariableNames:''
@@ -2238,21 +2240,20 @@
 #  else
         {
             unsigned char *__srcLastX;
-
             __srcLastX = __srcLast - 3 - 4;
             while (__src <= __srcLastX) {
                 unsigned int __sum, __sum2;
 
-                asm ("addl %%edx,%%eax      \n
-                      adcl $0, %%ecx
-                      movl $0,%%edx         \n
-                      adcl $0,%%edx"    
+                asm ("addl %%edx,%%ecx
+                      adcl $0, %%eax
+                      movl $0, %%edx
+                      adcl $0, %%edx"    
                         : "=d"  ((unsigned long)(__carry)),
-                          "=a"  ((unsigned long)(__sum)),
-                          "=c"  ((unsigned long)(__sum2))
+                          "=c"  ((unsigned long)(__sum)),
+                          "=a"  ((unsigned long)(__sum2))
                         : "0"   ((unsigned long)(__carry)),
                           "1"   ((unsigned long)(((unsigned *)__src)[0])),
-                          "2"   ((unsigned long)(((unsigned *)__src)[1])) );
+                          "2"   ((unsigned long)(((unsigned *)__src)[1])));
 
                 ((unsigned int *)(__src + __ptrDelta))[0] = __sum;
                 ((unsigned int *)(__src + __ptrDelta))[1] = __sum2;
@@ -2279,11 +2280,11 @@
             if (__src <= __srcLastX) {
                 unsigned int __sum;
 
-                asm ("addl %%edx,%%eax      \n
-                      movl $0,%%edx         \n
-                      adcl $0,%%edx"    
-                        : "=d"  ((unsigned long)(__carry)),
-                          "=a"  ((unsigned long)(__sum))
+                asm ("addl %%eax,%%edx
+                      movl $0,%%eax
+                      adcl $0,%%eax"    
+                        : "=a"  ((unsigned long)(__carry)),
+                          "=d"  ((unsigned long)(__sum))
                         : "0"   ((unsigned long)(__carry)),
                           "1"   ((unsigned long)(((unsigned *)__src)[0])) );
 
@@ -4063,5 +4064,5 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.128 1999-06-06 20:47:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.129 1999-06-09 14:29:42 stefan Exp $'
 ! !