source: src/SynTree/Type.cc @ b21c77a

new-env
Last change on this file since b21c77a was 28f3a19, checked in by Aaron Moss <a3moss@…>, 6 years ago

Merge branch 'master' into with_gc

  • Property mode set to 100644
File size: 3.1 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo
3//
4// The contents of this file are covered under the licence agreement in the
5// file "LICENCE" distributed with Cforall.
6//
7// Type.cc --
8//
9// Author           : Richard C. Bilson
10// Created On       : Mon May 18 07:44:20 2015
11// Last Modified By : Peter A. Buhr
12// Last Modified On : Fri Jun 22 10:17:19 2018
13// Update Count     : 39
14//
15#include "Type.h"
16
17#include "Attribute.h"                // for Attribute
18#include "Common/utility.h"           // for cloneAll, deleteAll, printAll
19#include "InitTweak/InitTweak.h"      // for getPointerBase
20#include "SynTree/BaseSyntaxNode.h"   // for BaseSyntaxNode
21#include "SynTree/Declaration.h"      // for TypeDecl
22#include "SynTree/TypeSubstitution.h" // for TypeSubstitution
23
24using namespace std;
25
26const char *BasicType::typeNames[] = {
27        "_Bool",
28        "char",
29        "signed char",
30        "unsigned char",
31        "signed short int",
32        "unsigned short int",
33        "signed int",
34        "unsigned int",
35        "signed long int",
36        "unsigned long int",
37        "signed long long int",
38        "unsigned long long int",
39        "float",
40        "double",
41        "long double",
42        "float _Complex",
43        "double _Complex",
44        "long double _Complex",
45        "float _Imaginary",
46        "double _Imaginary",
47        "long double _Imaginary",
48        "__int128",
49        "unsigned __int128",
50        "__float80",
51        "__float128"
52};
53static_assert(
54        sizeof(BasicType::typeNames)/sizeof(BasicType::typeNames[0]) == BasicType::NUMBER_OF_BASIC_TYPES,
55        "Each basic type name should have a corresponding kind enum value"
56);
57
58Type::Type( const Qualifiers &tq, const std::list< Attribute * > & attributes ) : tq( tq ), attributes( attributes ) {}
59
60Type::Type( const Type &other ) : BaseSyntaxNode( other ), tq( other.tq ) {
61        cloneAll( other.forall, forall );
62        cloneAll( other.attributes, attributes );
63}
64
65// These must remain in the same order as the corresponding bit fields.
66const char * Type::FuncSpecifiersNames[] = { "inline", "_Noreturn", "fortran" };
67const char * Type::StorageClassesNames[] = { "extern", "static", "auto", "register", "_Thread_local" };
68const char * Type::QualifiersNames[] = { "const", "restrict", "volatile", "lvalue", "mutex", "_Atomic" };
69
70Type * Type::stripDeclarator() {
71        Type * type, * at;
72        for ( type = this; (at = InitTweak::getPointerBase( type )); type = at );
73        return type;
74}
75
76Type * Type::stripReferences() {
77        Type * type;
78        ReferenceType * ref;
79        for ( type = this; (ref = dynamic_cast<ReferenceType *>( type )); type = ref->base );
80        return type;
81}
82
83int Type::referenceDepth() const { return 0; }
84
85TypeSubstitution Type::genericSubstitution() const { assertf( false, "Non-aggregate type: %s", toCString( this ) ); }
86
87void Type::print( std::ostream &os, Indenter indent ) const {
88        if ( ! forall.empty() ) {
89                os << "forall" << std::endl;
90                printAll( forall, os, indent+1 );
91                os << ++indent;
92        } // if
93
94        if ( ! attributes.empty() ) {
95                os << "with attributes" << endl;
96                printAll( attributes, os, indent+1 );
97        } // if
98
99        tq.print( os );
100}
101
102// Empty Variable declarations:
103const Type::FuncSpecifiers noFuncSpecifiers;
104const Type::StorageClasses noStorageClasses;
105const Type::Qualifiers noQualifiers;
106
107// Local Variables: //
108// tab-width: 4 //
109// mode: c++ //
110// compile-command: "make install" //
111// End: //
Note: See TracBrowser for help on using the repository browser.