RosettaCodeData/Task/Time-a-function/Joy/time-a-function.joy

4 lines
45 B
Plaintext

clock
1 1023 [dup +] times pop
clock swap -.