diff --git a/src/hollywoo_flixel/HollywooFlixelDSL.kiss b/src/hollywoo_flixel/HollywooFlixelDSL.kiss index 77f3fa8..732f139 100644 --- a/src/hollywoo_flixel/HollywooFlixelDSL.kiss +++ b/src/hollywoo_flixel/HollywooFlixelDSL.kiss @@ -667,6 +667,20 @@ (thing.destroy)))) (m.clear)) +(defMacro doOnUpdateWhile [condition &body b] + (let [funcName (symbol)] + `(withFunctions + [ + (,funcName [] + (when ,condition + (nextFrameActions.push + ->:Void { + ,@b + (,funcName) + }))) + ] + (,funcName)))) + (defMacro addSkips [flxMovieClass] `{ (method &override :Void prepareForSkip []