From c3fb135d9795a4fa7aca47e31f8dd63e6934d9e8 Mon Sep 17 00:00:00 2001 From: bunny Date: Wed, 17 Sep 2025 23:02:02 +0100 Subject: [PATCH] removed useless function --- parser.ml | 2 -- 1 file changed, 2 deletions(-) diff --git a/parser.ml b/parser.ml index e3bf936..97eaecf 100644 --- a/parser.ml +++ b/parser.ml @@ -15,8 +15,6 @@ type 'a parser = { run : input -> 'a parser_result } -let runParser i p = p.run i - let fold_left1 (f: 'a -> 'a -> 'a) (xs: 'a list) : 'a = match xs with | [] -> failwith "TODO: make method total; empty list" | x :: xs -> List.fold_left f x xs