RosettaCodeData/Task/Constrained-genericity/Zkl/constrained-genericity-1.zkl
2017-09-25 22:28:19 +02:00

10 lines
274 B
Text

class Eatable{ var v;
fcn eat{ println("munching ",self.topdog.name); }
}
class FoodBox{
fcn init(food1,food2,etc){
editable,garbage:=vm.arglist.filter22("isChildOf",Eatable);
var contents=editable;
if(garbage) println("Rejecting: ",garbage);
}
}