Compiler! - try         : sqr dup * ;
Ref for clang blocks