@@ -40,6 +40,7 @@ import PureScript.Backend.Chez.Convert (codegenModule)
4040import PureScript.Backend.Chez.Printer as Printer
4141import PureScript.Backend.Chez.Runtime (runtimeModule)
4242import PureScript.Backend.Optimizer.CoreFn (Module(..), ModuleName(..))
43+import Spago.Generated.BuildInfo as BuildInfo
4344
4445type BuildArgs =
4546 { coreFnDir :: FilePath
@@ -69,6 +70,8 @@ cliArgParser =
6970 do Bundle <$> bundleArgsParser <* ArgParser.flagHelp
7071 ]
7172 <* ArgParser.flagHelp
73+ <* ArgParser.flagInfo [ "--version", "-v" ] "Show the current version of purescm."
74+ BuildInfo.buildInfo.packages.purescm
7275
7376buildArgsParser :: ArgParser BuildArgs
7477buildArgsParser =