comparison wip_debug.patch @ 127:72b5b4a62cc5

Wip on fixing ref/scalar issues, partly fixed
author Louis Opter <louis@lse.epita.fr>
date Sun, 18 Aug 2013 15:33:24 -0700
parents
children 0fdaa93ed62b
comparison
equal deleted inserted replaced
126:6e142648b2fe 127:72b5b4a62cc5
1 # HG changeset patch
2 # Parent ea807d6831821c5fb094e7ae9258f5a282ec15e6
3 diff --git a/rathaxes/compiler/passes/common/rtxResolve.inc.cws b/rathaxes/compiler/passes/common/rtxResolve.inc.cws
4 --- a/rathaxes/compiler/passes/common/rtxResolve.inc.cws
5 +++ b/rathaxes/compiler/passes/common/rtxResolve.inc.cws
6 @@ -782,6 +782,11 @@
7 return false;
8 }
9
10 + if (coreString(local_node#parent.location,0,2) == "/home/kal/projs/rathaxes/rathaxes/samples/e1000/e1000.blt:971:")
11 + {
12 + traceLine(BLUE + toString(mapping,true) + DEFAULT_COLOR);
13 + }
14 +
15 if (isString(mapping))
16 {
17 local_node#parent.ref_placeholder.id = mapping;
18 @@ -812,9 +817,18 @@
19 }
20 local in_type = source_type.qualifier;
21 local out_type = local_node#parent.ph_type;
22 + traceLine("paf: " + local_node#parent.location);
23 + if (local_node#parent.location == "/home/kal/projs/rathaxes/rathaxes/samples/e1000/ethernet.blt:124:40")
24 + {
25 + traceLine(YELLOW + "in_type = " + in_type+ DEFAULT_COLOR);
26 + traceLine(YELLOW + "out_type = " + out_type+ DEFAULT_COLOR);
27 + traceLine(CYAN + toString(resolverValues,true) + DEFAULT_COLOR);
28 + }
29 if (rtxResolve_RefScalarTranscribe(mapping, in_type, out_type) == false)
30 { error(RED + "[Error] Cannot transcribe an expression from " + in_type + " to " + out_type + DEFAULT_COLOR); }
31 setall local_node#parent.ref_placeholder = mapping;
32 + if (coreString(local_node#parent.location,0,2) == "/home/kal/projs/rathaxes/rathaxes/samples/e1000/e1000.blt:971:")
33 + exit(1);
34 }
35 }
36 else if (isBuiltinVariable(varName)) // Mapping for a builtin type
37 @@ -1445,6 +1459,12 @@
38 }
39 rtxNodeArg_getValue(self, val);
40 setall out_node = val;
41 + if (placeHolder#parent.location == "/home/kal/projs/rathaxes/rathaxes/samples/e1000/ethernet.blt:124:40")
42 + {
43 + traceLine(PURPLE + toString(val,true)+ DEFAULT_COLOR);
44 + //error("toto");
45 + //exit(1);
46 + }
47 }
48
49 return true;