Changeset 4ee3b0c1 for src/Parser

Timestamp:

May 29, 2018, 10:50:03 AM (6 years ago)

Author:

Rob Schluntz <rschlunt@…>

Branches:

ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, demangler, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, with_gc

Children:

71e555c

Parents:

533540a

Message:

Push float80/float128 through the system

File:

• src/Parser/TypeData.cc (modified) (3 diffs)

src/Parser/TypeData.cc

@@ -575 +575 @@
 
           case DeclarationNode::Int128:
-                ret = td->signedness == 1 ? BasicType::UnsignedInt128 : BasicType::SignedInt128;
+                ret = td->signedness == DeclarationNode::Unsigned ? BasicType::UnsignedInt128 : BasicType::SignedInt128;
                 if ( td->length != DeclarationNode::NoLength ) {
                         genTSError( DeclarationNode::lengthNames[ td->length ], td->basictype );
@@ -599 +599 @@
                         genTSError( DeclarationNode::lengthNames[ td->length ], td->basictype );
                 } // if
-                if ( td->basictype == DeclarationNode::Float && td->length == DeclarationNode::Long ) {
+                if ( td->basictype != DeclarationNode::Double && td->length == DeclarationNode::Long ) {
                         genTSError( DeclarationNode::lengthNames[ td->length ], td->basictype );
                 } // if
@@ -605 +605 @@
                         const_cast<TypeData *>(td)->basictype = DeclarationNode::LongDouble;
                 } // if
+
+                if ( td->basictype == DeclarationNode::Float80 || td->basictype == DeclarationNode::Float128 ) {
+                        if ( td->complextype != DeclarationNode::NoComplexType ) {
+                                genTSError( DeclarationNode::complexTypeNames[ td->complextype ], td->basictype );
+                        }
+                        if ( td->basictype == DeclarationNode::Float80 ) ret = BasicType::Float80;
+                        else ret = BasicType::Float128;
+                        break;
+                }
 
                 ret = floattype[ td->complextype ][ td->basictype - DeclarationNode::Float ];