From 3a1eaff81196650214bcdbee3c98098ed02f77cb Mon Sep 17 00:00:00 2001
From: Robin Haberkorn <robin.haberkorn@googlemail.com>
Date: Sun, 27 Apr 2025 00:44:34 +0300
Subject: opener.tes: Fixed +line,column syntax

* After detecting +line[,column] constructs, the next argument is not parsed as a potential
  filename:line[:column] construct.
* This code turned out to be tricky to get right, so I added a test case.
  Standard library modules can well be checked in the test suite since
  we have $SCITECOPATH pointing to the source tree's lib/ directory.
* Make sure that relevant variables from atlocal.in are really exported into the
  process environment.
  This was also broken for the Glib debug options.
---
 lib/opener.tes | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'lib')

diff --git a/lib/opener.tes b/lib/opener.tes
index 6de6237..98ce631 100644
--- a/lib/opener.tes
+++ b/lib/opener.tes
@@ -15,9 +15,10 @@
 
     1U.l 1U.c
     !* +line[,column] *!
-    0A-+"=
-      C 0A"D \U.l <0A"DC|1;'> 0A-,"= C \U.c ' 0A-10"=L' '
-    '
+    0A-+"= C 0A"D
+      \U.l <0A"DC|1;'> 0A-,"= C \U.c <0A"DC|1;'> '
+      0A-10"= 2LR Oopen '
+    ' '
 
     !* filename:line[:column][:] *!
     LR -A-:"=R'
@@ -31,6 +32,7 @@
       LR
     '
 
+  !open!
     0X.f [*
       EBN.f Q.c-1,Q.l-1ESFINDCOLUMN:J
     ]*
-- 
cgit v1.2.3