Commit e54ec3bc authored by Ian Lynagh's avatar Ian Lynagh

Add a test for #5430

parent 0cbfe0b4
import System.Locale
import System.Time
main :: IO ()
main = do let clockTime = TOD 0 0 -- 00:00:00 on 1 Jan 1970
calTime <- toCalendarTime clockTime
putStrLn $ formatCalendarTime defaultTimeLocale "%j" calTime
test('time002', normal, compile_and_run, [''])
test('time003', normal, compile_and_run, [''])
test('time004', normal, compile_and_run, [''])
test('T5430', normal, compile_and_run, [''])
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment