source: src/ResolvExpr/ConversionCost.cc@ 1ed958c3

new-env with_gc
Last change on this file since 1ed958c3 was 1cdfa82, checked in by Aaron Moss <a3moss@…>, 8 years ago

Merge remote-tracking branch 'origin/master' into with_gc
  • Property mode set to 100644
File size: 18.3 KB
RevLine 
[a32b204]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//
[a436947]7// ConversionCost.cc --
[a32b204]8//
9// Author : Richard C. Bilson
10// Created On : Sun May 17 07:06:19 2015
11// Last Modified By : Peter A. Buhr
[201aeb9]12// Last Modified On : Mon Sep 25 15:43:34 2017
13// Update Count : 10
[a32b204]14//
[51b73452]15
16#include "ConversionCost.h"
[ea6332d]17
18#include <cassert> // for assert
19#include <list> // for list, list<>::const_iterator
20#include <string> // for operator==, string
21
[5af7306]22#include "Common/GC.h" // for new_static_root
[ea6332d]23#include "ResolvExpr/Cost.h" // for Cost
24#include "ResolvExpr/TypeEnvironment.h" // for EqvClass, TypeEnvironment
25#include "SymTab/Indexer.h" // for Indexer
26#include "SynTree/Declaration.h" // for TypeDecl, NamedTypeDecl
27#include "SynTree/Type.h" // for Type, BasicType, TypeInstType
28#include "typeops.h" // for typesCompatibleIgnoreQualifiers
[51b73452]29
30namespace ResolvExpr {
[b0837e4]31 const Cost Cost::zero = Cost( 0, 0, 0, 0 );
32 const Cost Cost::infinity = Cost( -1, -1, -1, -1 );
33 const Cost Cost::unsafe = Cost( 1, 0, 0, 0 );
34 const Cost Cost::poly = Cost( 0, 1, 0, 0 );
35 const Cost Cost::safe = Cost( 0, 0, 1, 0 );
36 const Cost Cost::reference = Cost( 0, 0, 0, 1 );
[b46e3bd]37
[5ccb10d]38#if 0
39#define PRINT(x) x
40#else
41#define PRINT(x)
42#endif
[a32b204]43 Cost conversionCost( Type *src, Type *dest, const SymTab::Indexer &indexer, const TypeEnvironment &env ) {
44 if ( TypeInstType *destAsTypeInst = dynamic_cast< TypeInstType* >( dest ) ) {
45 EqvClass eqvClass;
46 NamedTypeDecl *namedType;
[eb0aedb]47 PRINT( std::cerr << "type inst " << destAsTypeInst->name; )
48 if ( env.lookup( destAsTypeInst->name, eqvClass ) ) {
[0b150ec]49 if ( eqvClass.type ) {
50 return conversionCost( src, eqvClass.type, indexer, env );
51 } else {
52 return Cost::infinity;
53 }
[eb0aedb]54 } else if ( ( namedType = indexer.lookupType( destAsTypeInst->name ) ) ) {
[5ccb10d]55 PRINT( std::cerr << " found" << std::endl; )
[a32b204]56 TypeDecl *type = dynamic_cast< TypeDecl* >( namedType );
57 // all typedefs should be gone by this point
58 assert( type );
[eb0aedb]59 if ( type->base ) {
60 return conversionCost( src, type->base, indexer, env ) + Cost::safe;
[a32b204]61 } // if
62 } // if
[5ccb10d]63 PRINT( std::cerr << " not found" << std::endl; )
[a32b204]64 } // if
[5ccb10d]65 PRINT(
66 std::cerr << "src is ";
67 src->print( std::cerr );
68 std::cerr << std::endl << "dest is ";
69 dest->print( std::cerr );
70 std::cerr << std::endl << "env is" << std::endl;
71 env.print( std::cerr, 8 );
72 )
[a32b204]73 if ( typesCompatibleIgnoreQualifiers( src, dest, indexer, env ) ) {
[5ccb10d]74 PRINT( std::cerr << "compatible!" << std::endl; )
[89be1c68]75 return Cost::zero;
[a32b204]76 } else if ( dynamic_cast< VoidType* >( dest ) ) {
[89be1c68]77 return Cost::safe;
[2463d0e]78 } else if ( ReferenceType * refType = dynamic_cast< ReferenceType * > ( dest ) ) {
[5ccb10d]79 PRINT( std::cerr << "conversionCost: dest is reference" << std::endl; )
[721cd19f]80 return convertToReferenceCost( src, refType, indexer, env, [](Type * t1, Type * t2, const SymTab::Indexer &, const TypeEnvironment & env ){
[0c6596f]81 return ptrsAssignable( t1, t2, env );
82 });
[a32b204]83 } else {
[bd0b6b62]84 PassVisitor<ConversionCost> converter( dest, indexer, env, conversionCost );
[a32b204]85 src->accept( converter );
[bd0b6b62]86 if ( converter.pass.get_cost() == Cost::infinity ) {
[a32b204]87 return Cost::infinity;
88 } else {
[bd0b6b62]89 return converter.pass.get_cost() + Cost::zero;
[a32b204]90 } // if
91 } // if
92 }
93
[0c6596f]94 Cost convertToReferenceCost( Type * src, Type * dest, int diff, const SymTab::Indexer & indexer, const TypeEnvironment & env, PtrsFunction func ) {
[6e027d6]95 PRINT( std::cerr << "convert to reference cost... diff " << diff << " " << src << " / " << dest << std::endl; )
[89be1c68]96 if ( diff > 0 ) {
97 // TODO: document this
[eb0aedb]98 Cost cost = convertToReferenceCost( strict_dynamic_cast< ReferenceType * >( src )->base, dest, diff-1, indexer, env, func );
[7ebaa56]99 cost.incReference();
[89be1c68]100 return cost;
101 } else if ( diff < -1 ) {
102 // TODO: document this
[eb0aedb]103 Cost cost = convertToReferenceCost( src, strict_dynamic_cast< ReferenceType * >( dest )->base, diff+1, indexer, env, func );
[7ebaa56]104 cost.incReference();
[89be1c68]105 return cost;
106 } else if ( diff == 0 ) {
107 ReferenceType * srcAsRef = dynamic_cast< ReferenceType * >( src );
108 ReferenceType * destAsRef = dynamic_cast< ReferenceType * >( dest );
109 if ( srcAsRef && destAsRef ) { // pointer-like conversions between references
[5ccb10d]110 PRINT( std::cerr << "converting between references" << std::endl; )
[eb0aedb]111 Type::Qualifiers tq1 = srcAsRef->base->get_qualifiers();
112 Type::Qualifiers tq2 = destAsRef->base->get_qualifiers();
113 if ( tq1 <= tq2 && typesCompatibleIgnoreQualifiers( srcAsRef->base, destAsRef->base, indexer, env ) ) {
[6e027d6]114 PRINT( std::cerr << " :: compatible and good qualifiers" << std::endl; )
115 if ( tq1 == tq2 ) {
116 // types are the same
117 return Cost::zero;
118 } else {
119 // types are the same, except otherPointer has more qualifiers
120 return Cost::safe;
121 }
[89be1c68]122 } else { // xxx - this discards reference qualifiers from consideration -- reducing qualifiers is a safe conversion; is this right?
[721cd19f]123 int assignResult = func( srcAsRef->base, destAsRef->base, indexer, env );
[5ccb10d]124 PRINT( std::cerr << "comparing references: " << assignResult << " " << srcAsRef << " " << destAsRef << std::endl; )
[b0837e4]125 if ( assignResult > 0 ) {
[89be1c68]126 return Cost::safe;
[b0837e4]127 } else if ( assignResult < 0 ) {
[89be1c68]128 return Cost::unsafe;
129 } // if
[2463d0e]130 } // if
131 } else {
[5ccb10d]132 PRINT( std::cerr << "reference to rvalue conversion" << std::endl; )
[bd0b6b62]133 PassVisitor<ConversionCost> converter( dest, indexer, env, conversionCost );
[89be1c68]134 src->accept( converter );
[bd0b6b62]135 return converter.pass.get_cost();
[89be1c68]136 } // if
[2463d0e]137 } else {
[89be1c68]138 ReferenceType * destAsRef = dynamic_cast< ReferenceType * >( dest );
139 assert( diff == -1 && destAsRef );
[108f3cdb]140 PRINT( std::cerr << "dest is: " << dest << " / src is: " << src << std::endl; )
[eb0aedb]141 if ( typesCompatibleIgnoreQualifiers( src, destAsRef->base, indexer, env ) ) {
[5ccb10d]142 PRINT( std::cerr << "converting compatible base type" << std::endl; )
[89be1c68]143 if ( src->get_lvalue() ) {
[5ccb10d]144 PRINT(
145 std::cerr << "lvalue to reference conversion" << std::endl;
146 std::cerr << src << " => " << destAsRef << std::endl;
147 )
[89be1c68]148 // lvalue-to-reference conversion: cv lvalue T => cv T &
[eb0aedb]149 if ( src->get_qualifiers() == destAsRef->base->get_qualifiers() ) {
[7ebaa56]150 return Cost::reference; // cost needs to be non-zero to add cast
[eb0aedb]151 } if ( src->get_qualifiers() < destAsRef->base->get_qualifiers() ) {
[7ebaa56]152 return Cost::safe; // cost needs to be higher than previous cast to differentiate adding qualifiers vs. keeping same
[89be1c68]153 } else {
154 return Cost::unsafe;
155 } // if
[eb0aedb]156 } else if ( destAsRef->base->get_const() ) {
[5ccb10d]157 PRINT( std::cerr << "rvalue to const ref conversion" << std::endl; )
[89be1c68]158 // rvalue-to-const-reference conversion: T => const T &
159 return Cost::safe;
160 } else {
[5ccb10d]161 PRINT( std::cerr << "rvalue to non-const reference conversion" << std::endl; )
[89be1c68]162 // rvalue-to-reference conversion: T => T &
163 return Cost::unsafe;
164 } // if
165 } // if
[5ccb10d]166 PRINT( std::cerr << "attempting to convert from incompatible base type -- fail" << std::endl; )
[2463d0e]167 }
168 return Cost::infinity;
169 }
170
[0c6596f]171 Cost convertToReferenceCost( Type * src, ReferenceType * dest, const SymTab::Indexer & indexer, const TypeEnvironment & env, PtrsFunction func ) {
[89be1c68]172 int sdepth = src->referenceDepth(), ddepth = dest->referenceDepth();
[eddb399]173 Cost cost = convertToReferenceCost( src, dest, sdepth-ddepth, indexer, env, func );
174 PRINT( std::cerr << "convertToReferenceCost result: " << cost << std::endl; )
175 return cost;
[89be1c68]176 }
177
[721cd19f]178 ConversionCost::ConversionCost( Type *dest, const SymTab::Indexer &indexer, const TypeEnvironment &env, CostFunction costFunc )
179 : dest( dest ), indexer( indexer ), cost( Cost::infinity ), env( env ), costFunc( costFunc ) {
[a32b204]180 }
[51b73452]181
182/*
[a32b204]183 Old
184 ===
185 Double
186 |
187 Float
188 |
189 ULong
190 / \
191 UInt Long
192 \ /
193 Int
194 |
195 Ushort
196 |
197 Short
198 |
199 Uchar
200 / \
201 Schar Char
202
203 New
204 ===
205 +-----LongDoubleComplex--+
206 LongDouble--+ | +-LongDoubleImag
207 | +---DoubleComplex---+ |
208 Double------+ | +----DoubleImag
209 | +-FloatComplex-+ |
210 Float---------+ +-------FloatImag
211 |
212 ULongLong
213 |
214 LongLong
215 |
216 ULong
217 / \
218 UInt Long
219 \ /
220 Int
221 |
222 Ushort
223 |
224 Short
225 |
226 Uchar
227 / \
228 Schar Char
229 \ /
230 Bool
[51b73452]231*/
232
[201aeb9]233 static const int costMatrix[ BasicType::NUMBER_OF_BASIC_TYPES ][ BasicType::NUMBER_OF_BASIC_TYPES ] = {
234 /* Src \ Dest: Bool Char SChar UChar Short UShort Int UInt Long ULong LLong ULLong Float Double LDbl FCplex DCplex LDCplex FImag DImag LDImag I128, U128 */
235 /* Bool */ { 0, 1, 1, 2, 3, 4, 5, 6, 6, 7, 8, 9, 12, 13, 14, 12, 13, 14, -1, -1, -1, 10, 11, },
236 /* Char */ { -1, 0, -1, 1, 2, 3, 4, 5, 5, 6, 7, 8, 11, 12, 13, 11, 12, 13, -1, -1, -1, 9, 10, },
237 /* SChar */ { -1, -1, 0, 1, 2, 3, 4, 5, 5, 6, 7, 8, 11, 12, 13, 11, 12, 13, -1, -1, -1, 9, 10, },
238 /* UChar */ { -1, -1, -1, 0, 1, 2, 3, 4, 4, 5, 6, 7, 10, 11, 12, 10, 11, 12, -1, -1, -1, 8, 9, },
239 /* Short */ { -1, -1, -1, -1, 0, 1, 2, 3, 3, 4, 5, 6, 9, 10, 11, 9, 10, 11, -1, -1, -1, 7, 8, },
240 /* UShort */{ -1, -1, -1, -1, -1, 0, 1, 2, 2, 3, 4, 5, 8, 9, 10, 8, 9, 10, -1, -1, -1, 6, 7, },
241 /* Int */ { -1, -1, -1, -1, -1, -1, 0, 1, 1, 2, 3, 4, 7, 8, 9, 7, 8, 9, -1, -1, -1, 5, 6, },
242 /* UInt */ { -1, -1, -1, -1, -1, -1, -1, 0, -1, 1, 2, 3, 6, 7, 8, 6, 7, 8, -1, -1, -1, 4, 5, },
243 /* Long */ { -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, 2, 3, 6, 7, 8, 6, 7, 8, -1, -1, -1, 4, 5, },
244 /* ULong */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, 2, 5, 6, 7, 5, 6, 7, -1, -1, -1, 3, 4, },
245 /* LLong */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, 4, 5, 6, 4, 5, 6, -1, -1, -1, 2, 3, },
246 /* ULLong */{ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 3, 4, 5, 3, 4, 5, -1, -1, -1, 1, 2, },
247
248 /* Float */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, 2, 1, 2, 3, -1, -1, -1, -1, -1, },
249 /* Double */{ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, -1, 1, 2, -1, -1, -1, -1, -1, },
250 /* LDbl */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, -1, -1, 1, -1, -1, -1, -1, -1, },
251 /* FCplex */{ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, 2, -1, -1, -1, -1, -1, },
252 /* DCplex */{ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, -1, -1, -1, -1, -1, },
253 /* LDCplex */{ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, -1, -1, -1, -1, -1, },
254 /* FImag */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 1, 2, 3, 0, 1, 2, -1, -1, },
255 /* DImag */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 1, 2, -1, 0, 1, -1, -1, },
256 /* LDImag */{ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 1, -1, -1, 0, -1, -1, },
257
258 /* I128 */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 2, 3, 4, 3, 4, 5, -1, -1, -1, 0, 1, },
259 /* U128 */ { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 1, 2, 3, 2, 3, 4, -1, -1, -1, -1, 0, },
[a32b204]260 };
261
[bd0b6b62]262 void ConversionCost::postvisit( VoidType * ) {
[a32b204]263 cost = Cost::infinity;
264 }
265
[bd0b6b62]266 void ConversionCost::postvisit(BasicType *basicType) {
[a32b204]267 if ( BasicType *destAsBasic = dynamic_cast< BasicType* >( dest ) ) {
268 int tableResult = costMatrix[ basicType->get_kind() ][ destAsBasic->get_kind() ];
269 if ( tableResult == -1 ) {
[89be1c68]270 cost = Cost::unsafe;
[a32b204]271 } else {
[89be1c68]272 cost = Cost::zero;
273 cost.incSafe( tableResult );
[a32b204]274 } // if
[a436947]275 } else if ( dynamic_cast< EnumInstType *>( dest ) ) {
276 // xxx - not positive this is correct, but appears to allow casting int => enum
[89be1c68]277 cost = Cost::unsafe;
[89e6ffc]278 } // if
[98278b3a]279 // no cases for zero_t/one_t because it should not be possible to convert int, etc. to zero_t/one_t.
[a32b204]280 }
281
[bd0b6b62]282 void ConversionCost::postvisit( PointerType * pointerType ) {
[a32b204]283 if ( PointerType *destAsPtr = dynamic_cast< PointerType* >( dest ) ) {
[6e027d6]284 PRINT( std::cerr << pointerType << " ===> " << destAsPtr << std::endl; )
[eb0aedb]285 Type::Qualifiers tq1 = pointerType->base->get_qualifiers();
286 Type::Qualifiers tq2 = destAsPtr->base->get_qualifiers();
287 if ( tq1 <= tq2 && typesCompatibleIgnoreQualifiers( pointerType->base, destAsPtr->base, indexer, env ) ) {
[6e027d6]288 PRINT( std::cerr << " :: compatible and good qualifiers" << std::endl; )
[cb43451]289 if ( tq1 == tq2 ) {
290 // types are the same
291 cost = Cost::zero;
292 } else {
293 // types are the same, except otherPointer has more qualifiers
294 cost = Cost::safe;
295 }
[b8b075cd]296 } else {
[b0837e4]297 int assignResult = ptrsAssignable( pointerType->base, destAsPtr->base, env );
[5ccb10d]298 PRINT( std::cerr << " :: " << assignResult << std::endl; )
[b8b075cd]299 if ( assignResult > 0 && tq1 <= tq2 ) {
300 // xxx - want the case where qualifiers are added to be more expensive than the case where qualifiers are the same. Is 1 safe vs. 2 safe correct?
301 if ( tq1 == tq2 ) {
302 cost = Cost::safe;
303 } else if ( tq1 < tq2 ) {
304 cost = Cost::safe+Cost::safe;
305 }
[b0837e4]306 } else if ( assignResult < 0 ) {
[89be1c68]307 cost = Cost::unsafe;
[a32b204]308 } // if
[cb43451]309 // assignResult == 0 means Cost::Infinity
[a32b204]310 } // if
[98278b3a]311 // case case for zero_t because it should not be possible to convert pointers to zero_t.
[a32b204]312 } // if
313 }
314
[bd0b6b62]315 void ConversionCost::postvisit( ArrayType * ) {}
[2463d0e]316
[bd0b6b62]317 void ConversionCost::postvisit( ReferenceType * refType ) {
[2463d0e]318 // Note: dest can never be a reference, since it would have been caught in an earlier check
319 assert( ! dynamic_cast< ReferenceType * >( dest ) );
320 // convert reference to rvalue: cv T1 & => T2
321 // recursively compute conversion cost from T1 to T2.
322 // cv can be safely dropped because of 'implicit dereference' behavior.
[721cd19f]323 cost = costFunc( refType->base, dest, indexer, env );
[150ec33]324 if ( refType->base->get_qualifiers() == dest->get_qualifiers() ) {
[cb43451]325 cost.incReference(); // prefer exact qualifiers
[150ec33]326 } else if ( refType->base->get_qualifiers() < dest->get_qualifiers() ) {
[cb43451]327 cost.incSafe(); // then gaining qualifiers
328 } else {
329 cost.incUnsafe(); // lose qualifiers as last resort
330 }
[5ccb10d]331 PRINT( std::cerr << refType << " ==> " << dest << " " << cost << std::endl; )
[2463d0e]332 }
333
[bd0b6b62]334 void ConversionCost::postvisit( FunctionType * ) {}
[a32b204]335
[bd0b6b62]336 void ConversionCost::postvisit( StructInstType * inst ) {
[a32b204]337 if ( StructInstType *destAsInst = dynamic_cast< StructInstType* >( dest ) ) {
[150ec33]338 if ( inst->name == destAsInst->name ) {
[a32b204]339 cost = Cost::zero;
340 } // if
341 } // if
342 }
343
[bd0b6b62]344 void ConversionCost::postvisit( UnionInstType * inst ) {
[150ec33]345 if ( UnionInstType *destAsInst = dynamic_cast< UnionInstType* >( dest ) ) {
346 if ( inst->name == destAsInst->name ) {
[a32b204]347 cost = Cost::zero;
348 } // if
349 } // if
350 }
351
[bd0b6b62]352 void ConversionCost::postvisit( EnumInstType * ) {
[a32b204]353 static Type::Qualifiers q;
[5af7306]354 static BasicType* integer = new_static_root<BasicType>( q, BasicType::SignedInt );
355 cost = costFunc( integer, dest, indexer, env ); // safe if dest >= int
[89be1c68]356 if ( cost < Cost::unsafe ) {
[a32b204]357 cost.incSafe();
358 } // if
359 }
360
[bd0b6b62]361 void ConversionCost::postvisit( TraitInstType * ) {}
[a32b204]362
[bd0b6b62]363 void ConversionCost::postvisit( TypeInstType *inst ) {
[a32b204]364 EqvClass eqvClass;
365 NamedTypeDecl *namedType;
[eb0aedb]366 if ( env.lookup( inst->name, eqvClass ) ) {
[721cd19f]367 cost = costFunc( eqvClass.type, dest, indexer, env );
[a32b204]368 } else if ( TypeInstType *destAsInst = dynamic_cast< TypeInstType* >( dest ) ) {
[eb0aedb]369 if ( inst->name == destAsInst->name ) {
[a32b204]370 cost = Cost::zero;
371 }
[eb0aedb]372 } else if ( ( namedType = indexer.lookupType( inst->name ) ) ) {
[a32b204]373 TypeDecl *type = dynamic_cast< TypeDecl* >( namedType );
374 // all typedefs should be gone by this point
375 assert( type );
[eb0aedb]376 if ( type->base ) {
[721cd19f]377 cost = costFunc( type->base, dest, indexer, env ) + Cost::safe;
[a32b204]378 } // if
379 } // if
380 }
381
[bd0b6b62]382 void ConversionCost::postvisit( TupleType * tupleType ) {
[89be1c68]383 Cost c = Cost::zero;
[b0837e4]384 if ( TupleType * destAsTuple = dynamic_cast< TupleType * >( dest ) ) {
[eb0aedb]385 std::list< Type * >::const_iterator srcIt = tupleType->types.begin();
386 std::list< Type * >::const_iterator destIt = destAsTuple->types.begin();
387 while ( srcIt != tupleType->types.end() && destIt != destAsTuple->types.end() ) {
[721cd19f]388 Cost newCost = costFunc( *srcIt++, *destIt++, indexer, env );
[a32b204]389 if ( newCost == Cost::infinity ) {
390 return;
391 } // if
392 c += newCost;
393 } // while
[eb0aedb]394 if ( destIt != destAsTuple->types.end() ) {
[a32b204]395 cost = Cost::infinity;
396 } else {
397 cost = c;
398 } // if
399 } // if
400 }
[44b7088]401
[bd0b6b62]402 void ConversionCost::postvisit( VarArgsType * ) {
[90c3b1c]403 if ( dynamic_cast< VarArgsType* >( dest ) ) {
[44b7088]404 cost = Cost::zero;
405 }
406 }
[89e6ffc]407
[bd0b6b62]408 void ConversionCost::postvisit( ZeroType * ) {
[b0837e4]409 if ( dynamic_cast< ZeroType * >( dest ) ) {
[89e6ffc]410 cost = Cost::zero;
411 } else if ( BasicType *destAsBasic = dynamic_cast< BasicType* >( dest ) ) {
412 // copied from visit(BasicType*) for signed int, but +1 for safe conversions
413 int tableResult = costMatrix[ BasicType::SignedInt ][ destAsBasic->get_kind() ];
414 if ( tableResult == -1 ) {
[89be1c68]415 cost = Cost::unsafe;
[89e6ffc]416 } else {
[89be1c68]417 cost = Cost::zero;
418 cost.incSafe( tableResult + 1 );
[89e6ffc]419 }
420 } else if ( dynamic_cast< PointerType* >( dest ) ) {
[89be1c68]421 cost = Cost::safe;
[89e6ffc]422 }
423 }
424
[bd0b6b62]425 void ConversionCost::postvisit( OneType * ) {
[b0837e4]426 if ( dynamic_cast< OneType * >( dest ) ) {
[89e6ffc]427 cost = Cost::zero;
428 } else if ( BasicType *destAsBasic = dynamic_cast< BasicType* >( dest ) ) {
429 // copied from visit(BasicType*) for signed int, but +1 for safe conversions
430 int tableResult = costMatrix[ BasicType::SignedInt ][ destAsBasic->get_kind() ];
431 if ( tableResult == -1 ) {
[89be1c68]432 cost = Cost::unsafe;
[89e6ffc]433 } else {
[89be1c68]434 cost = Cost::zero;
435 cost.incSafe( tableResult + 1 );
[89e6ffc]436 }
437 }
438 }
[51b73452]439} // namespace ResolvExpr
[a32b204]440
441// Local Variables: //
442// tab-width: 4 //
443// mode: c++ //
444// compile-command: "make install" //
445// End: //
Note: See TracBrowser for help on using the repository browser.