ain :: IO ()
main = execParser config >>= FrontEnd.wrapExceptions "pulsar-pp" . execute
  where
    config =
      info
        (helper <*> parseConfig)
        (fullDesc <> header "pulsar-pp - The pre-processor for DCPU-16 assembly."
                  <> progDesc "Pre-process the named file by performing text substitutions.")

main :: IO ()
main = execParser config >>= FrontEnd.wrapExceptions "pulsar-pp" . execute
  where
    config =
      info
        (helper <*> parseConfig)
        (fullDesc <> header "pulsar-pp - The pre-processor for DCPU-16 assembly."
                  <> progDesc "Pre-process the named file by performing text substitutions.")
main = execParser config >>= FrontEnd.wrapExceptions "pulsar-pp" . execute
  where
    config =
      info
        (helper <*> parseConfig)
        (fullDesc <> header "pulsar-pp - The pre-processor for DCPU-16 assembly."
                  <> progDesc "Pre-process the named file by performing text substitutions.")