From 9ccb3fce8e390f09fa5b812a77f7a65c10c5e4b1 Mon Sep 17 00:00:00 2001
From: Vladimir Azarov <avm@intermediate-node.net>
Date: Wed, 4 Jun 2025 20:45:08 +0200
Subject: Registration of declarations

---
 driver.fun | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'driver.fun')

diff --git a/driver.fun b/driver.fun
index ff99091..ac9f950 100644
--- a/driver.fun
+++ b/driver.fun
@@ -21,7 +21,7 @@ functor Driver(P: PARSER): DRIVER = struct
 
   val die = fn z => die 1 z
 
-  fun finish ({ file = NONE, ... }: config) = die `"missing input file" %
+  fun finish ({ file = NONE, ... }: config) = die `"No file specified" %
     | finish conf = updateC conf u#includeDirs rev %
 
   fun parseFlag conf "-dE" tail =
@@ -52,7 +52,7 @@ functor Driver(P: PARSER): DRIVER = struct
     case (#mode config) of
       Normal =>
         let
-          val parseCtx = P.createParseCtx file (#includeDirs config)
+          val parseCtx = P.createCtx file (#includeDirs config)
 
           fun collect ctx =
           let
-- 
cgit v1.2.3