From a952ae451cc27d5de3877bb522db6c050532ea2a Mon Sep 17 00:00:00 2001
From: Vladimir Azarov <avm@intermediate-node.net>
Date: Sun, 25 May 2025 23:46:06 +0200
Subject: Nested expressions

---
 ppc.sig | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'ppc.sig')

diff --git a/ppc.sig b/ppc.sig
index b2dcbae..0bfaca7 100644
--- a/ppc.sig
+++ b/ppc.sig
@@ -14,6 +14,8 @@ signature PPC = sig
     Cop
 
   val clerror: tkPos -> tkClass list -> 'a
+  val error: tkPos -> ((bool * ((string -> unit) * (unit -> unit)))
+    * ('a * ((string -> unit) * (unit -> unit)) -> 'b) -> 'c) -> 'c
 
   val create: { fname: string, incDirs: string list, debugMode: bool } -> t
   val getToken: t -> T.token * tkPos * t
-- 
cgit v1.2.3