# Decrement variable passed by name set decr { set @1 (- @@1 1) } set limit 2 for (map { .. @1 ! } [ world creator 'darkness, my old friend' ]) { { print 'hello ' @1 '\n' } @1 if (= 0 (decr limit)) { break } }