Unix time plus milliseconds parsed incorrectly

[ad-si]

This works:

timeParse (toFormat "EPOCH ms") "1536080415 123"
-- Just (DateTime {
-- dtDate = Date {dateYear = 2018, dateMonth = September, dateDay = 4}, 
-- dtTime = TimeOfDay {todHour = 17h, todMin = 0m, todSec = 15s, todNSec = 123000000ns}})

But this doesn't:

timeParse (toFormat "EPOCHms") "1536080415123"
-- Nothing

Looks like a bug to me!?