RosettaCodeData/Task/Flatten-a-list/Zkl/flatten-a-list.zkl
2017-09-25 22:28:19 +02:00

5 lines
201 B
Text

fcn flatten(list){ list.pump(List,
fcn(i){ if(List.isType(i)) return(Void.Recurse,i,self.fcn); i}) }
flatten(L(L(1), L(2), L(L(3,4), 5), L(L(L())), L(L(L(6))), 7, 8, L()))
//-->L(1,2,3,4,5,6,7,8)