aelve/guide
1
1
Fork 0
mirror of https://github.com/aelve/guide.git synced 2024-12-23 21:02:13 +03:00
Code Issues Projects Releases Wiki Activity

Add NominalDiffTime (#168)

Browse Source
This commit is contained in:
Jens Krause 2017-07-09 06:39:59 +02:00
parent 45c4905783
commit d9aef376e2
No known key found for this signature in database
GPG Key ID: 3B2FAFBCEFA5906D
1 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
front-ps/src/Data/Time/NominalDiffTime.purs Normal file
View File

@ -0,0 +1,17 @@
module Data.Time.NominalDiffTime
( NominalDiffTime (..)
) where
import Prelude
import Data.Generic (class Generic, gShow)
import Data.Newtype (class Newtype)
import Data.Time.Duration (Seconds)
newtype NominalDiffTime = NominalDiffTime Seconds
derive instance ntNominalDiffTime :: Newtype NominalDiffTime _
derive instance gNominalDiffTime :: Generic NominalDiffTime
derive instance eqNominalDiffTime :: Eq NominalDiffTime
derive instance ordNominalDiffTime :: Ord NominalDiffTime
instance showNominalDiffTime :: Show NominalDiffTime where
show = gShow