File tree 2 files changed +29
-1
lines changed
tests/unit/src/unit/issues
2 files changed +29
-1
lines changed Original file line number Diff line number Diff line change @@ -1109,7 +1109,7 @@ let generate_function ctx f =
1109
1109
let expr = (if fid = 0 then reg r else (match rtype r with
1110
1110
| HObj o | HStruct o ->
1111
1111
let name, t = resolve_field o (fid - 1 ) in
1112
- Printf. sprintf " %s->%s" (reg r) name
1112
+ Printf. sprintf " & %s->%s" (reg r) name
1113
1113
| _ ->
1114
1114
Globals. die " " __LOC__
1115
1115
)) in
Original file line number Diff line number Diff line change
1
+ package unit .issues ;
2
+
3
+ private class Foo {
4
+ public var m : Map <Int , String >;
5
+ public var length : Int ;
6
+ public function new () {
7
+ }
8
+ }
9
+
10
+ class Issue12000 extends unit. Test {
11
+ var obj = new Foo ();
12
+
13
+ #if hl
14
+ public function test () {
15
+ untyped $prefetch (obj , 0 );
16
+ untyped $prefetch (obj , 1 );
17
+ untyped $prefetch (obj , 2 );
18
+ untyped $prefetch (obj , 3 );
19
+ untyped $prefetch (obj , 4 );
20
+ untyped $prefetch (obj .length , 0 );
21
+ untyped $prefetch (obj .length , 1 );
22
+ untyped $prefetch (obj .length , 2 );
23
+ untyped $prefetch (obj .length , 3 );
24
+ untyped $prefetch (obj .length , 4 );
25
+ noAssert ();
26
+ }
27
+ #end
28
+ }
You can’t perform that action at this time.
0 commit comments