|
17 | 17 | (type $B.desc (sub $A.desc (describes $B (struct))))
|
18 | 18 | )
|
19 | 19 |
|
20 |
| - ;; CHECK: (global $A (ref null $A) (ref.null none)) |
21 |
| - (global $A (ref null $A) (ref.null none)) |
22 |
| - ;; CHECK: (global $A.desc (ref null $A.desc) (ref.null none)) |
23 |
| - (global $A.desc (ref null $A.desc) (ref.null none)) |
| 20 | + ;; CHECK: (global $A (ref null $A) (struct.new_default $A)) |
| 21 | + (global $A (ref null $A) (struct.new $A (struct.new $A.desc))) |
| 22 | + ;; CHECK: (global $A.desc (ref null $A.desc) (struct.new_default $A.desc)) |
| 23 | + (global $A.desc (ref null $A.desc) (struct.new $A.desc)) |
24 | 24 | ;; CHECK: (global $B (ref null $B) (struct.new_default $B))
|
25 |
| - (global $B (ref null $B) (struct.new $B (ref.null none))) |
26 |
| - ;; CHECK: (global $B.desc (ref null $B.desc) (ref.null none)) |
27 |
| - (global $B.desc (ref null $B.desc) (ref.null none)) |
| 25 | + (global $B (ref null $B) (struct.new $B (struct.new $B.desc))) |
| 26 | + ;; CHECK: (global $B.desc (ref null $B.desc) (struct.new_default $B.desc)) |
| 27 | + (global $B.desc (ref null $B.desc) (struct.new $B.desc)) |
| 28 | +) |
| 29 | + |
| 30 | +;; Now we require the descriptor to preserve the traps in the globals. |
| 31 | +(module |
| 32 | + (rec |
| 33 | + ;; CHECK: (rec |
| 34 | + ;; CHECK-NEXT: (type $A (sub (descriptor $A.desc (struct)))) |
| 35 | + (type $A (sub (descriptor $A.desc (struct)))) |
| 36 | + ;; CHECK: (type $A.desc (sub (describes $A (struct)))) |
| 37 | + (type $A.desc (sub (describes $A (struct)))) |
| 38 | + ) |
| 39 | + |
| 40 | + ;; CHECK: (global $A.desc (ref null (exact $A.desc)) (struct.new_default $A.desc)) |
| 41 | + (global $A.desc (ref null (exact $A.desc)) (struct.new $A.desc)) |
| 42 | + ;; CHECK: (global $A (ref null $A) (struct.new_default $A |
| 43 | + ;; CHECK-NEXT: (global.get $A.desc) |
| 44 | + ;; CHECK-NEXT: )) |
| 45 | + (global $A (ref null $A) (struct.new $A (global.get $A.desc))) |
| 46 | +) |
| 47 | + |
| 48 | +;; But traps on null descriptors inside a function can be fixed up, so they |
| 49 | +;; don't require keeping the descriptors. |
| 50 | +(module |
| 51 | + (rec |
| 52 | + ;; CHECK: (rec |
| 53 | + ;; CHECK-NEXT: (type $A (sub (struct))) |
| 54 | + (type $A (sub (descriptor $A.desc (struct)))) |
| 55 | + ;; CHECK: (type $A.desc (sub (struct))) |
| 56 | + (type $A.desc (sub (describes $A (struct)))) |
| 57 | + ) |
| 58 | + |
| 59 | + ;; CHECK: (type $2 (func (param (ref null (exact $A.desc))))) |
| 60 | + |
| 61 | + ;; CHECK: (func $nullable-descs (type $2) (param $A.desc (ref null (exact $A.desc))) |
| 62 | + ;; CHECK-NEXT: (local $1 (ref (exact $A.desc))) |
| 63 | + ;; CHECK-NEXT: (drop |
| 64 | + ;; CHECK-NEXT: (block (result (ref (exact $A))) |
| 65 | + ;; CHECK-NEXT: (local.set $1 |
| 66 | + ;; CHECK-NEXT: (ref.as_non_null |
| 67 | + ;; CHECK-NEXT: (local.get $A.desc) |
| 68 | + ;; CHECK-NEXT: ) |
| 69 | + ;; CHECK-NEXT: ) |
| 70 | + ;; CHECK-NEXT: (struct.new_default $A) |
| 71 | + ;; CHECK-NEXT: ) |
| 72 | + ;; CHECK-NEXT: ) |
| 73 | + ;; CHECK-NEXT: ) |
| 74 | + (func $nullable-descs (param $A.desc (ref null (exact $A.desc))) |
| 75 | + (drop |
| 76 | + (struct.new $A |
| 77 | + (local.get $A.desc) |
| 78 | + ) |
| 79 | + ) |
| 80 | + ) |
| 81 | +) |
| 82 | + |
| 83 | +;; No fixup is necessary if the descriptor cannot be null in the first place. |
| 84 | +(module |
| 85 | + (rec |
| 86 | + ;; CHECK: (rec |
| 87 | + ;; CHECK-NEXT: (type $A (sub (struct))) |
| 88 | + (type $A (sub (descriptor $A.desc (struct)))) |
| 89 | + ;; CHECK: (type $A.desc (sub (struct))) |
| 90 | + (type $A.desc (sub (describes $A (struct)))) |
| 91 | + ) |
| 92 | + |
| 93 | + ;; CHECK: (type $2 (func (param (ref (exact $A.desc))))) |
| 94 | + |
| 95 | + ;; CHECK: (func $nullable-descs (type $2) (param $A.desc (ref (exact $A.desc))) |
| 96 | + ;; CHECK-NEXT: (drop |
| 97 | + ;; CHECK-NEXT: (block (result (ref (exact $A))) |
| 98 | + ;; CHECK-NEXT: (struct.new_default $A) |
| 99 | + ;; CHECK-NEXT: ) |
| 100 | + ;; CHECK-NEXT: ) |
| 101 | + ;; CHECK-NEXT: ) |
| 102 | + (func $nullable-descs (param $A.desc (ref (exact $A.desc))) |
| 103 | + (drop |
| 104 | + ;; Now the descriptor is non-null. |
| 105 | + (struct.new $A |
| 106 | + (local.get $A.desc) |
| 107 | + ) |
| 108 | + ) |
| 109 | + ) |
28 | 110 | )
|
29 | 111 |
|
30 |
| -;; Now we require the descriptors for both types. We should still be able to |
31 |
| -;; optimize the subtype relationship. |
| 112 | +;; Now we require the descriptors for both types explicitly in a function. We |
| 113 | +;; should still be able to optimize the subtype relationship. |
32 | 114 | (module
|
33 | 115 | (rec
|
34 | 116 | ;; CHECK: (rec
|
|
1011 | 1093 | )
|
1012 | 1094 |
|
1013 | 1095 | ;; CHECK: (func $func-null (type $2)
|
| 1096 | + ;; CHECK-NEXT: (local $0 (ref none)) |
1014 | 1097 | ;; CHECK-NEXT: (drop
|
1015 | 1098 | ;; CHECK-NEXT: (block (result (ref (exact $struct)))
|
| 1099 | + ;; CHECK-NEXT: (local.set $0 |
| 1100 | + ;; CHECK-NEXT: (ref.as_non_null |
| 1101 | + ;; CHECK-NEXT: (ref.null none) |
| 1102 | + ;; CHECK-NEXT: ) |
| 1103 | + ;; CHECK-NEXT: ) |
1016 | 1104 | ;; CHECK-NEXT: (struct.new_default $struct)
|
1017 | 1105 | ;; CHECK-NEXT: )
|
1018 | 1106 | ;; CHECK-NEXT: )
|
|
0 commit comments