| 334 | |
| 335 | |
| 336 | value getAbstract(value inAbstract) |
| 337 | { |
| 338 | void *data = val_to_kind(inAbstract,myKind); |
| 339 | if (!data) |
| 340 | return alloc_int(-1); |
| 341 | |
| 342 | return alloc_int(*(int *)data); |
| 343 | } |
| 344 | DEFINE_PRIM(getAbstract, 1); |
| 345 | |
| 346 |
nothing calls this directly
no test coverage detected