-
Notifications
You must be signed in to change notification settings - Fork 75
/
instant.clj
28 lines (25 loc) · 1.62 KB
/
instant.clj
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
(ns clojure.core.typed.test.instant
(:require [clojure.core.typed :as t]
[clojure.test :refer :all]
[clojure.core.typed.test.test-utils :refer :all]))
(deftest read-instant-date-test
(is-tc-e (read-instant-date "2014-04-23T10:13Z") java.util.Date
:requires [[clojure.instant :refer [read-instant-date]]])
(is-tc-err (read-instant-date "2014-04-23T10:13Z") String
:requires [[clojure.instant :refer [read-instant-date]]])
(is-tc-err (read-instant-date 201404231013) java.util.Date
:requires [[clojure.instant :refer [read-instant-date]]]))
(deftest read-instant-calendar-test
(is-tc-e (read-instant-calendar "2014-04-23T10:13Z") java.util.GregorianCalendar
:requires [[clojure.instant :refer [read-instant-calendar]]])
(is-tc-err (read-instant-calendar "2014-04-23T10:13Z") String
:requires [[clojure.instant :refer [read-instant-calendar]]])
(is-tc-err (read-instant-calendar 201404231013) java.util.GregorianCalendar
:requires [[clojure.instant :refer [read-instant-calendar]]]))
(deftest read-instant-timestamp-test
(is-tc-e (read-instant-timestamp "2014-04-23T10:13Z") java.sql.Timestamp
:requires [[clojure.instant :refer [read-instant-timestamp]]])
(is-tc-err (read-instant-timestamp "2014-04-23T10:13Z") String
:requires [[clojure.instant :refer [read-instant-timestamp]]])
(is-tc-err (read-instant-timestamp 201404231013) java.sql.Timestamp
:requires [[clojure.instant :refer [read-instant-timestamp]]]))