(defn
parse-timestamp
[ts]
(if-let
[[years months days hours minutes seconds ms offset]
(parse-and-validate-timestamp ts)]
(js/Date.
(-
(.UTC js/Date years (dec months) days hours minutes seconds ms)
(* offset 60 1000)))
(throw (js/Error. (str "Unrecognized date/time syntax: " ts)))))