X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/d437292a11e89c11c839145237a1871316593800..3088c93403f4b8c015ecc6f789248ebef644ddcb:/test/chimaera.sod diff --git a/test/chimaera.sod b/test/chimaera.sod index 193d5ec..0723ae1 100644 --- a/test/chimaera.sod +++ b/test/chimaera.sod @@ -16,11 +16,8 @@ code h : includes { class Animal : SodObject { int tickles = 0; - [combination = progn] - void tickle(); - - [role = before] - void nml.tickle() { me->nml.tickles++; } + [combination = progn] void tickle(); + [role = before] void nml.tickle() { me->nml.tickles++; } } class Lion : Animal { @@ -34,16 +31,21 @@ class Goat : Animal { } class Serpent : Animal { + int limit = 2; + void hiss() { puts("Sssss!"); } void bite() { puts("Nom!"); } void nml.tickle() { - if (SERPENT__CONV_NML(me)->nml.tickles <= 2) Serpent_hiss(me); - else Serpent_bite(me); + if (SERPENT__CONV_NML(me)->nml.tickles <= me->serpent.limit) + Serpent_hiss(me); + else + Serpent_bite(me); } } [nick = sir, link = Animal] class Chimaera : Lion, Goat, Serpent { + serpent.limit = 1; } code c : user {