diff options
| author | John J. Camilleri <john@digitalgrammars.com> | 2018-07-04 13:40:46 +0200 |
|---|---|---|
| committer | John J. Camilleri <john@digitalgrammars.com> | 2018-07-04 13:40:46 +0200 |
| commit | b9b02171601f68a8896ad2f369c700e356c8615b (patch) | |
| tree | f498583eb56135b9f181de096eba6b4e08d13015 /src/compiler | |
| parent | f64b17eef7cef49debb9f42e943e02da48089f06 (diff) | |
Remove code which tries to get version information from darcs folder
Diffstat (limited to 'src/compiler')
| -rw-r--r-- | src/compiler/GF/Infra/BuildInfo.hs | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/src/compiler/GF/Infra/BuildInfo.hs b/src/compiler/GF/Infra/BuildInfo.hs index 9cf111831..f0230246b 100644 --- a/src/compiler/GF/Infra/BuildInfo.hs +++ b/src/compiler/GF/Infra/BuildInfo.hs @@ -2,11 +2,9 @@ module GF.Infra.BuildInfo where import System.Info import Data.Version(showVersion) -import DarcsVersion_gf {-# NOINLINE buildInfo #-} buildInfo = - {-details++"\n"++-} "Built on "++os++"/"++arch ++" with "++compilerName++"-"++showVersion compilerVersion ++", flags:" @@ -22,17 +20,3 @@ buildInfo = #ifdef C_RUNTIME ++" c-runtime" #endif - where - details = either (const no_info) info darcs_info - no_info = "No detailed version info available" - info (otag,olast,changes,whatsnew) = - (case changes of - 0 -> "No recorded changes" - 1 -> "One recorded change" - _ -> show changes++" recorded changes")++ - (case whatsnew of - 0 -> "" - 1 -> " + one file with unrecorded changes" - _ -> " + "++show whatsnew++" files with unrecorded changes")++ - (maybe "" (" since "++) otag)++ - (maybe "" ("\nLast recorded change: "++) olast) |