e90c3b1 · typeable/gitrev

git.iko.soy/typeable/gitrev

update Example.hs in haddock

commite90c3b1e85cf8a7d4fec50e01f9b351158370ddb authorAdam C. Foltzer <acfoltzer@galois.com> dateMon 11 Jan 2016, 11:55 (11 years ago) parent2ae047b

1 file changed+2−1

compare with master

unifiedsplit

src/Development/GitRev.hs+2−1

src/Development/GitRev.hs+2−1

@@ -18,6 +18,7 @@

1818-- > panic msg = error panicMsg

1919-- > where panicMsg =

2020-- > concat [ "[panic ", $(gitBranch), "@", $(gitHash)

21+-- > , " (", $(gitCommitDate), ")"

2122-- > , " (", $(gitCommitCount), " commits in HEAD)"

2223-- > , dirty, "] ", msg ]

2324-- > dirty | $(gitDirty) = " (uncommitted files present)"

@@ -26,7 +27,7 @@

2627-- > main = panic "oh no!"

2728--

2829-- > % cabal exec runhaskell Example.hs

29−-- > Example.hs: [panic master@2702e69355c978805064543489c351b61ac6760b (6 commits in HEAD) (uncommitted files present)] oh no!

30+-- > Example.hs: [panic master@2ae047ba5e4a6f0f3e705a43615363ac006099c1 (Mon Jan 11 11:50:59 2016 -0800) (14 commits in HEAD) (uncommitted files present)] oh no!

3031

3132module Development.GitRev (gitHash, gitBranch, gitDirty, gitCommitCount, gitCommitDate) where

3233