Changeset 9ec8c5f for tests/manipulatorsOutput3.cfa

Timestamp:

Jul 5, 2020, 5:24:13 PM (4 years ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, arm-eh, ast-experimental, enum, forall-pointer-decay, jacob/cs343-translation, master, new-ast, new-ast-unique-expr, pthread-emulation, qualifiedEnum

Children:

2ed33710, 381132b

Parents:

2c60c644

Message:

add additional int128 tests

File:

• tests/manipulatorsOutput3.cfa (modified) (3 diffs)

tests/manipulatorsOutput3.cfa

@@ -13 +13 @@
     sout | sign(x);
     sout | nl;
-#if 1
+
     sout | bin(x);
     sout | upcase(bin(x));
@@ -124 +124 @@
     sout | nl;
 
-    
+
+    // extras
+    sout | "extras";
     sout | bin(divisor);
     sout | upcase(bin(divisor));
@@ -140 +142 @@
     sout | left(sign(wd(0,40, divisor))) | 'X';
     printf( "%-+1.40dX\n", 123456789 );
-#endif // 0
+
+    int128 i128;
+    unsigned int128 ui128;
+
+    i128 = -10;
+    for ( 25 ) {
+        sout | left( sign( wd( 20, i128 ) ) ) | left( wd( 20, hex( i128 ) ) ) | left( wd( 20, oct( i128 ) ) );
+        sout | left( wd( 20, bin( i128 ) ) );
+        i128 += 1;
+    }
+    sout | nl;
+
+    i128 = 0x7fffffffffffffff;
+    i128 <<= 64;
+    i128 += 0xfffffffffffffffa;
+
+    for ( 20 ) {
+        sout | i128;
+        sout | left( sign( wd( 45, i128 ) ) ) | left( wd( 45, hex( i128 ) ) ) | left( wd( 45, oct( i128 ) ) );
+        sout | left( wd( 45, bin( i128 ) ) );
+        i128 += 1;
+    }
+    sout | nl;
+
+    ui128 = 0x7fffffffffffffff;
+    ui128 <<= 64;
+    ui128 += 0xfffffffffffffffa;
+    
+    for ( 20 ) {
+        sout | ui128;
+        ui128 += 1;
+    }
+    sout | nl;
+
+    ui128 = 0xffffffffffffffff;
+    ui128 <<= 64;
+    ui128 += 0xfffffffffffffffa;
+    
+    for ( 20 ) {
+        sout | ui128;
+        ui128 += 1;
+    }
 }