~mdw
/
sod
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
src/c-types-parse.lisp: Introduce a pluggable parser for declspecs.
[sod]
/
test
/
chimaera.sod
diff --git
a/test/chimaera.sod
b/test/chimaera.sod
index
644bb74
..
0723ae1
100644
(file)
--- a/
test/chimaera.sod
+++ b/
test/chimaera.sod
@@
-31,16
+31,21
@@
class Goat : Animal {
}
class Serpent : Animal {
}
class Serpent : Animal {
+ int limit = 2;
+
void hiss() { puts("Sssss!"); }
void bite() { puts("Nom!"); }
void nml.tickle() {
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 {
}
}
[nick = sir, link = Animal]
class Chimaera : Lion, Goat, Serpent {
+ serpent.limit = 1;
}
code c : user {
}
code c : user {