You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
31 lines
669 B
31 lines
669 B
(use "errno.witx")
|
|
(use "excuse.witx")
|
|
|
|
;; Every worker needs a union. Organize your workplace!
|
|
;; Fight for the full product of your labor!
|
|
|
|
(typename $reason
|
|
(union $excuse
|
|
(field $dog_ate f32)
|
|
(field $traffic s32)
|
|
(empty $sleeping)))
|
|
|
|
(typename $reason_mut
|
|
(union $excuse
|
|
(field $dog_ate (@witx pointer f32))
|
|
(field $traffic (@witx pointer s32))
|
|
(empty $sleeping)))
|
|
|
|
(module $union_example
|
|
(@interface func (export "get_tag")
|
|
(param $r $reason)
|
|
(result $error $errno)
|
|
(result $t $excuse)
|
|
)
|
|
|
|
(@interface func (export "reason_mult")
|
|
(param $r $reason_mut)
|
|
(param $multiply_by u32)
|
|
(result $error $errno)
|
|
)
|
|
)
|
|
|