cryptol/tests/parser/RunLexer.hs
2014-04-17 15:34:25 -07:00

14 lines
325 B
Haskell

-- |
-- Module : $Header$
-- Copyright : (c) 2013-2014 Galois, Inc.
-- License : BSD3
-- Maintainer : cryptol@galois.com
-- Stability : provisional
-- Portability : portable
import Cryptol.Parser.Lexer
import Cryptol.Parser.PP
main :: IO ()
main = interact (unlines . map (show . pp) . fst . primLexer)