--------------------------------------------------------------
--                        Numbers                           --
--------------------------------------------------------------

lexerUnsignedInteger = TestCase $ do
  tokens <- getLexerReprs [ BpLine "123" ]
  assertEqual "line of int should equal" tokens [ LpInteger 123 ]
lexerUnsignedInteger = TestCase $ do
  tokens <- getLexerReprs [ BpLine "123" ]
  assertEqual "line of int should equal" tokens [ LpInteger 123 ]
lexerUnsignedInteger = TestCase $ do
  tokens <- getLexerReprs [ BpLine "123" ]
  assertEqual "line of int should equal" tokens [ LpInteger 123 ]