You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
21 lines
414 B
21 lines
414 B
7 years ago
|
{-# LANGUAGE QuasiQuotes #-}
|
||
|
|
|
||
|
|
module Version
|
||
|
|
(
|
||
|
|
quikConnectorVersion,
|
||
|
|
quikConnectorVersionText
|
||
|
|
) where
|
||
|
|
|
||
|
|
import qualified Data.Text as T
|
||
|
|
import Text.Printf.TH
|
||
|
|
|
||
|
|
quikConnectorVersion :: (Int, Int, Int, Int)
|
||
|
|
quikConnectorVersion = (0, 2, 3, 0)
|
||
|
|
|
||
|
|
quikConnectorVersionText :: T.Text
|
||
|
|
quikConnectorVersionText =
|
||
|
|
[st|%d.%d.%d.%d|] v1 v2 v3 v4
|
||
|
|
where
|
||
|
|
(v1, v2, v3, v4) = quikConnectorVersion
|
||
|
|
|