From 80a0d3a3ff2127ffbb9fdba1fde17650dd005e99 Mon Sep 17 00:00:00 2001
From: Norayr Chilingarian <norayr@arnet.am>
Date: Tue, 23 May 2023 22:26:11 +0400
Subject: [PATCH] fix of --extention feature.

---
 src/compiler/OPM.Mod | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/compiler/OPM.Mod b/src/compiler/OPM.Mod
index 203b1b0e..557c5e52 100755
--- a/src/compiler/OPM.Mod
+++ b/src/compiler/OPM.Mod
@@ -298,7 +298,9 @@ MODULE OPM;  (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96  *)
       WHILE s[0] = OptionChar DO
         IF s = cextopt (* if '--extention' present *) THEN
             (* cext it is initialized as ".c" in Configuration.Mod *)
-            Modules.GetArg(S, s); COPY(s, Configuration.cext); 
+            INC(S);
+            Modules.GetArg(S, s);
+            COPY(s, Configuration.cext); 
         ELSE
           ScanOptions(s);
         END;