test_parses_noargs_application :: Assertion
test_parses_noargs_application =
  let program  = "foo()"
      cube     = Application (LocalVariable "foo") [] Nothing
      expected = Program [StExpression $ EApp cube]
  in  parserTest program expected
test_parses_noargs_application :: Assertion
test_parses_noargs_application =
  let program  = "foo()"
      cube     = Application (LocalVariable "foo") [] Nothing
      expected = Program [StExpression $ EApp cube]
  in  parserTest program expected
test_parses_noargs_application =
  let program  = "foo()"
      cube     = Application (LocalVariable "foo") [] Nothing
      expected = Program [StExpression $ EApp cube]
  in  parserTest program expected