set f $ block (a b c) print a b c call f (int 1) (int 2) (int 3) f (int 1) (int 2) (int 3)