svn commit: r647016 - in /commons/sandbox/exec/trunk/src/test/scripts: error.dcl test.dcl

[se...@apache.org]

Author: sebb
Date: Thu Apr 10 16:50:32 2008
New Revision: 647016

URL: http://svn.apache.org/viewvc?rev=647016&view=rev
Log:
Just realised that Exec uses logicals rather than symbols for "environment variables"

Modified:
    commons/sandbox/exec/trunk/src/test/scripts/error.dcl
    commons/sandbox/exec/trunk/src/test/scripts/test.dcl

Modified: commons/sandbox/exec/trunk/src/test/scripts/error.dcl
URL: http://svn.apache.org/viewvc/commons/sandbox/exec/trunk/src/test/scripts/error.dcl?rev=647016&r1=647015&r2=647016&view=diff
==============================================================================
--- commons/sandbox/exec/trunk/src/test/scripts/error.dcl (original)
+++ commons/sandbox/exec/trunk/src/test/scripts/error.dcl Thu Apr 10 16:50:32 2008
@@ -19,6 +19,7 @@
 $!
 $! do something and return an error result code
 $!
-$ write sys$output "FOO.''TEST_ENV_VAR'.''P1'"
+$ ENV_VAR=f$trnlnm("TEST_ENV_VAR")
+$ write sys$output "FOO.''ENV_VAR'.''P1'"
 $!
 $ exit 2 ! this is an Error

Modified: commons/sandbox/exec/trunk/src/test/scripts/test.dcl
URL: http://svn.apache.org/viewvc/commons/sandbox/exec/trunk/src/test/scripts/test.dcl?rev=647016&r1=647015&r2=647016&view=diff
==============================================================================
--- commons/sandbox/exec/trunk/src/test/scripts/test.dcl (original)
+++ commons/sandbox/exec/trunk/src/test/scripts/test.dcl Thu Apr 10 16:50:32 2008
@@ -20,6 +20,7 @@
 $! print the given environment variable and command line parameter
 $! since this is verified by the regression test
 $!
-$ write sys$output "FOO.''TEST_ENV_VAR'.''P1'"
+$ ENV_VAR=f$trnlnm("TEST_ENV_VAR")
+$ write sys$output "FOO.''ENV_VAR'.''P1'"
 $!
 $ exit 1 ! normal exit