git @ Cat's Eye Technologies SixtyPical / 3420fbc
Erase types from IndirectIndexed locations. Cat's Eye Technologies 7 years ago
2 changed file(s) with 3 addition(s) and 1 deletion(s). Raw diff Collapse all Expand all
264264 = main ([])
265265 = A: PoisonedWith (Immediate 4)
266266 = Y: UpdatedWith (Immediate 0)
267 = IndirectIndexed (NamedLocation (Just Word) "position") Y: UpdatedWith A
267 = IndirectIndexed (NamedLocation Nothing "position") Y: UpdatedWith A
268268 = NamedLocation Nothing "position": PoisonedWith A
269269 = NamedLocation Nothing "value": UpdatedWith (Immediate 1)
270270 =
3131 untypedLocation x
3232 untypedLocation (Indexed table index) =
3333 untypedLocation table
34 untypedLocation (IndirectIndexed word index) =
35 IndirectIndexed (untypedLocation word) index
3436 untypedLocation (NamedLocation _ name) =
3537 NamedLocation Nothing name
3638 untypedLocation x = x