RosettaCodeData/Task/System-time/CLU/system-time.clu

4 lines
94 B
Plaintext

start_up = proc ()
stream$putl(stream$primary_output(), date$unparse(now()))
end start_up