Problem Statement

Output the system time   (any units will do as long as they are noted) either by a system command or one built into the language. The system time can be used for debugging, network information, random number seeds, or something as simple as program performance.

Let's start with the solution:

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