Changeset dbe8e31c

Timestamp:

Jul 12, 2020, 10:43:59 AM (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:

ccb776b

Parents:

a3d3efc

Message:

use #if to elide int128 code for 32-bit build

Files:

• libcfa/prelude/builtins.c (modified) (2 diffs)
• src/Parser/ExpressionNode.cc (modified) (6 diffs)

libcfa/prelude/builtins.c

@@ -10 +10 @@
 // Created On       : Fri Jul 21 16:21:03 2017
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Wed Jul  8 22:43:14 2020
-// Update Count     : 105
+// Last Modified On : Sun Jul 12 10:40:57 2020
+// Update Count     : 107
 //
 
@@ -95 +95 @@
 static inline forall( dtype DT ) DT * intptr( uintptr_t addr ) { return (DT *)addr; }
 
+#if __SIZEOF_POINTER__ == 8                                                             // 64-bit mode
 // constructor for 128-bit numbers (all constants are unsigned as +/- are operators)
 static inline void ?{}( unsigned int128 & this, unsigned long int h, unsigned long int l ) {
         this = (unsigned int128)h << 64 | (unsigned int128)l;
 } // ?{}
+#endif // 64-bit mode
 
 // exponentiation operator implementation

src/Parser/ExpressionNode.cc

@@ -10 +10 @@
 // Created On       : Sat May 16 13:17:07 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Sat Jul 11 16:44:49 2020
-// Update Count     : 1034
+// Last Modified On : Sun Jul 12 08:15:12 2020
+// Update Count     : 1039
 //
 
@@ -185 +185 @@
 
         // Cannot be just "0"/"1"; sscanf stops at the suffix, if any; value goes over the wall => always generate
+
+#if __SIZEOF_POINTER__ == 8                                                             // 64-bit mode
+        if ( type == 5 ) SemanticError( yylloc, "int128 constant is not supported on this target " + str );
+#endif // 64-bit mode
         
         if ( str[0] == '0' ) {                                                          // radix character ?
@@ -215 +219 @@
                         if ( type < 5 ) {                                                       // not L128 ?
                                 sscanf( (char *)str.c_str(), "%llo", &v );
+#if __SIZEOF_POINTER__ == 8                                                             // 64-bit mode
                         } else {                                                                        // octal int128 constant
                                 unsigned int len = str.length();
@@ -240 +245 @@
                                         str = buf;
                                 } // if
+#endif // 64-bit mode
                         } // if
                         //printf( "%#llo %llu\n", v, v );
@@ -246 +252 @@
                 if ( type < 5 ) {                                                               // not L128 ?
                         sscanf( (char *)str.c_str(), "%llu", &v );
+#if __SIZEOF_POINTER__ == 8                                                             // 64-bit mode
                 } else {                                                                                // decimal int128 constant
                         #define P10_UINT64 10'000'000'000'000'000'000ULL // 19 zeroes
@@ -273 +280 @@
                                 str = buf;
                         } // if
+#endif // 64-bit mode
                 } // if
                 //printf( "%llu\n", v );