- (let ((m (mesh (lambda (args) (apply ,proc args)))))
- (m 'property-set! 'args params)
+ (let ((m (mesh (lambda (props) (apply ,proc ((@ (gacela utils) arguments-apply) ,proc props))))))
+ (m 'properties-set! ((@ (gacela utils) arguments-calling) ,proc params))