aboutsummaryrefslogtreecommitdiff
path: root/src/__OLD_parcom/peek.cr
diff options
context:
space:
mode:
Diffstat (limited to 'src/__OLD_parcom/peek.cr')
-rw-r--r--src/__OLD_parcom/peek.cr23
1 files changed, 0 insertions, 23 deletions
diff --git a/src/__OLD_parcom/peek.cr b/src/__OLD_parcom/peek.cr
deleted file mode 100644
index 2b6f657..0000000
--- a/src/__OLD_parcom/peek.cr
+++ /dev/null
@@ -1,23 +0,0 @@
-require "./parser.cr"
-
-module Parcom
- # `Peek` is a `Parser` that runs another `Parser` while
- # leaving the input stream unmodified.
- class Peek(T, V) < Parser(T, V)
- # Accepts the parser to run.
- def initialize(@p : Parser(T, V))
- end
-
- # Runs the parser it was initialized with, and returns
- # that parser's result along with the original input.
- #
- # Re-raises a `ParserFail` exception if the other parser fails.
- def parse(tokens : Tokens(T)) : Result(T, V)
- result = @p.parse(tokens)
- Result.new(tokens, result.value)
- rescue ex : ParserFail
- raise ParserFail.new("Peek: #{ex.message}")
- end
- end
-end
-