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.
20 lines
414 B
20 lines
414 B
{-# 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 |
|
|
|
|