quipu mercurial repository
Revision | d0cbe1e769ae0a8c8a702a2ab6c5b413ca838d4b (tree) |
---|---|
Time | 2019-02-06 06:21:46 |
Author | Agustina Arzille <avarzille@rise...> |
Commiter | Agustina Arzille |
Fix handling of parent types
@@ -231,6 +231,10 @@ | ||
231 | 231 | interp->raise2 ("arg-error", "parent must be a typespec"); |
232 | 232 | |
233 | 233 | p.add (px, 0); |
234 | + | |
235 | + const auto tx = as_array (as_typespec(px)->parents); | |
236 | + for (int i = 0; i < tx->len; ++i) | |
237 | + p.add (tx->data[i], 0); | |
234 | 238 | } |
235 | 239 | |
236 | 240 | slotname_list_t slots; |