Hi Erich,
I think I do not use the correct editor with KATE for my .ini file, it is
too silly for me.
I attach to you my last 2 test-files.
I think you can tell me what I have to do.
Greetings
Franz

Am Do., 18. Mai 2023 um 15:10 Uhr schrieb Erich Steinböck <
erich.steinbo...@gmail.com>:

> Hi Franz,
> your address "" "rexxc" works in your MyRexxComp.rex and prints:
> all went well with: MyRexxComp.rex , MyRexxComp.cmp.rex has been created
>
> Please provide a piece of failing code and the exact error message you're
> seeing.
> Note that on Linux (in contrast to Windows) the case of filenames is
> significant.
> _______________________________________________
> Oorexx-devel mailing list
> Oorexx-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
fmarx@localhost:~/Schreibtisch/FMarx ooRexx> rexx MyRexxComp.rex
     6 *-* Say "MyRexxComp (V3.3) starts" time()
       >L>   "MyRexxComp (V3.3) starts"
       >F>   TIME => "17:30:11"
       >O>   " " => "MyRexxComp (V3.3) starts 17:30:11"
       >>>   "MyRexxComp (V3.3) starts 17:30:11"
MyRexxComp (V3.3) starts 17:30:11
     7 *-* myfile = "MyRexxComp.ini"
       >L>   "MyRexxComp.ini"
       >>>   "MyRexxComp.ini"
       >=>   MYFILE <= "MyRexxComp.ini"
     9 *-* MyCode = STREAM(myfile,"C","OPEN READ")
       >V>   MYFILE => "MyRexxComp.ini"
       >A>   "MyRexxComp.ini"
       >L>   "C"
       >A>   "C"
       >L>   "OPEN READ"
       >A>   "OPEN READ"
       >F>   STREAM => "READY:"
       >>>   "READY:"
       >=>   MYCODE <= "READY:"
    10 *-* IF Mycode \= "READY:"
       >V>   MYCODE => "READY:"
       >L>   "READY:"
       >O>   "\=" => "0"
       >>>   "0"
    16 *-* N=LINES(myfile,COUNT)
       >V>   MYFILE => "MyRexxComp.ini"
       >A>   "MyRexxComp.ini"
       >V>   COUNT => "COUNT"
       >A>   "COUNT"
       >F>   LINES => "9"
       >>>   "9"
       >=>   N <= "9"
    17 *-* DO I=1 TO N
       >L>     "1"
       >V>     N => "9"
       >K>     "TO" => "9"
       >=>     I <= "1"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => 
"/*'*****************************************************************************************************************************************/"
       >K>     "VALUE" => 
"/*'*****************************************************************************************************************************************/"
       >>>     
"/*'*****************************************************************************************************************************************/"
       >=>     REXXFILE1 <= 
"/*'*****************************************************************************************************************************************/"
       >.>     ""
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => 
"/*'*****************************************************************************************************************************************/"
       >A>     
"/*'*****************************************************************************************************************************************/"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "��"
       >L>     "/*"
       >O>     "==" => "0"
       >>>     "0"
    20 *-*   if rexxFile1 = ""
       >V>     REXXFILE1 => 
"/*'*****************************************************************************************************************************************/"
       >L>     ""
       >O>     "=" => "0"
       >>>     "0"
    21 *-*   rexxFile2=rexxFile1||".cmp.rex"
       >V>     REXXFILE1 => 
"/*'*****************************************************************************************************************************************/"
       >L>     ".cmp.rex"
       >O>     "||" => 
"/*'*****************************************************************************************************************************************/.cmp.rex"
       >>>     
"/*'*****************************************************************************************************************************************/.cmp.rex"
       >=>     REXXFILE2 <= 
"/*'*****************************************************************************************************************************************/.cmp.rex"
    22 *-*   rexxFile1=rexxFile1||".rex"
       >V>     REXXFILE1 => 
"/*'*****************************************************************************************************************************************/"
       >L>     ".rex"
       >O>     "||" => 
"/*'*****************************************************************************************************************************************/.rex"
       >>>     
"/*'*****************************************************************************************************************************************/.rex"
       >=>     REXXFILE1 <= 
"/*'*****************************************************************************************************************************************/.rex"
    23 *-*   address "" "rexxc" rexxFile1 rexxFile2 "-s"
       >L>     "rexxc"
       >V>     REXXFILE1 => 
"/*'*****************************************************************************************************************************************/.rex"
       >O>     " " => "rexxc 
/*'*****************************************************************************************************************************************/.rex"
       >V>     REXXFILE2 => 
"/*'*****************************************************************************************************************************************/.cmp.rex"
       >O>     " " => "rexxc 
/*'*****************************************************************************************************************************************/.rex
 
/*'*****************************************************************************************************************************************/.cmp.rex"
       >L>     "-s"
       >O>     " " => "rexxc 
/*'*****************************************************************************************************************************************/.rex
 
/*'*****************************************************************************************************************************************/.cmp.rex
 -s"
       >>>     "rexxc 
/*'*****************************************************************************************************************************************/.rex
 
/*'*****************************************************************************************************************************************/.cmp.rex
 -s"
Error 3:  Failure during initialization.
Error 3.901:  Failure during initialization: Program 
"/******************************************************************************************************************************************/.rex
 
/******************************************************************************************************************************************/.cmp.rex"
 was not found.
       +++     "RC(253)"
    24 *-*   if rc=0
       >V>     RC => "253"
       >L>     "0"
       >O>     "=" => "0"
       >>>     "0"
    25 *-*     else
    25 *-*       say "problem! rc="rc", please check:" rexxFile1
       >L>         "problem! rc="
       >V>         RC => "253"
       >O>         "" => "problem! rc=253"
       >L>         ", please check:"
       >O>         "" => "problem! rc=253, please check:"
       >V>         REXXFILE1 => 
"/*'*****************************************************************************************************************************************/.rex"
       >O>         " " => "problem! rc=253, please check: 
/*'*****************************************************************************************************************************************/.rex"
       >>>         "problem! rc=253, please check: 
/*'*****************************************************************************************************************************************/.rex"
problem! rc=253, please check: 
/*'*****************************************************************************************************************************************/.rex
    26 *-* End
    17 *-* DO I=1 TO N
       >V>     I => "1"
       >=>     I <= "2"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => "/*   MyRexxComp.ini has to contain all the names of 
my Rexx-Program 1.) to check out and if ok -> 2. create a compiled Rexx with 
*.cmp.rex */"
       >K>     "VALUE" => "/*   MyRexxComp.ini has to contain all the names of 
my Rexx-Program 1.) to check out and if ok -> 2. create a compiled Rexx with 
*.cmp.rex */"
       >>>     "/*   MyRexxComp.ini has to contain all the names of my 
Rexx-Program 1.) to check out and if ok -> 2. create a compiled Rexx with 
*.cmp.rex */"
       >=>     REXXFILE1 <= "/*"
       >.>     "  MyRexxComp.ini has to contain all the names of my 
Rexx-Program 1.) to check out and if ok -> 2. create a compiled Rexx with 
*.cmp.rex */"
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => "/*"
       >A>     "/*"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "/*"
       >L>     "/*"
       >O>     "==" => "1"
       >>>     "1"
    19 *-*     then
    19 *-*       iterate   /* line begins with comment */
    17 *-* DO I=1 TO N
       >V>     I => "2"
       >=>     I <= "3"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => 
"/*'*****************************************************************************************************************************************/"
       >K>     "VALUE" => 
"/*'*****************************************************************************************************************************************/"
       >>>     
"/*'*****************************************************************************************************************************************/"
       >=>     REXXFILE1 <= 
"/*'*****************************************************************************************************************************************/"
       >.>     ""
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => 
"/*'*****************************************************************************************************************************************/"
       >A>     
"/*'*****************************************************************************************************************************************/"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "/*"
       >L>     "/*"
       >O>     "==" => "1"
       >>>     "1"
    19 *-*     then
    19 *-*       iterate   /* line begins with comment */
    17 *-* DO I=1 TO N
       >V>     I => "3"
       >=>     I <= "4"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => "     MyRexxComp       /* Rexx-Programm to analyze and 
compile */"
       >K>     "VALUE" => "     MyRexxComp       /* Rexx-Programm to analyze 
and compile */"
       >>>     "     MyRexxComp       /* Rexx-Programm to analyze and compile 
*/"
       >=>     REXXFILE1 <= "MyRexxComp"
       >.>     "      /* Rexx-Programm to analyze and compile */"
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => "MyRexxComp"
       >A>     "MyRexxComp"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "My"
       >L>     "/*"
       >O>     "==" => "0"
       >>>     "0"
    20 *-*   if rexxFile1 = ""
       >V>     REXXFILE1 => "MyRexxComp"
       >L>     ""
       >O>     "=" => "0"
       >>>     "0"
    21 *-*   rexxFile2=rexxFile1||".cmp.rex"
       >V>     REXXFILE1 => "MyRexxComp"
       >L>     ".cmp.rex"
       >O>     "||" => "MyRexxComp.cmp.rex"
       >>>     "MyRexxComp.cmp.rex"
       >=>     REXXFILE2 <= "MyRexxComp.cmp.rex"
    22 *-*   rexxFile1=rexxFile1||".rex"
       >V>     REXXFILE1 => "MyRexxComp"
       >L>     ".rex"
       >O>     "||" => "MyRexxComp.rex"
       >>>     "MyRexxComp.rex"
       >=>     REXXFILE1 <= "MyRexxComp.rex"
    23 *-*   address "" "rexxc" rexxFile1 rexxFile2 "-s"
       >L>     "rexxc"
       >V>     REXXFILE1 => "MyRexxComp.rex"
       >O>     " " => "rexxc MyRexxComp.rex"
       >V>     REXXFILE2 => "MyRexxComp.cmp.rex"
       >O>     " " => "rexxc MyRexxComp.rex MyRexxComp.cmp.rex"
       >L>     "-s"
       >O>     " " => "rexxc MyRexxComp.rex MyRexxComp.cmp.rex -s"
       >>>     "rexxc MyRexxComp.rex MyRexxComp.cmp.rex -s"
    24 *-*   if rc=0
       >V>     RC => "0"
       >L>     "0"
       >O>     "=" => "1"
       >>>     "1"
    24 *-*     then
    24 *-*       say "all went well with:" rexxFile1 "," rexxFile2 "has been 
created"
       >L>         "all went well with:"
       >V>         REXXFILE1 => "MyRexxComp.rex"
       >O>         " " => "all went well with: MyRexxComp.rex"
       >L>         ","
       >O>         " " => "all went well with: MyRexxComp.rex ,"
       >V>         REXXFILE2 => "MyRexxComp.cmp.rex"
       >O>         " " => "all went well with: MyRexxComp.rex , 
MyRexxComp.cmp.rex"
       >L>         "has been created"
       >O>         " " => "all went well with: MyRexxComp.rex , 
MyRexxComp.cmp.rex has been created"
       >>>         "all went well with: MyRexxComp.rex , MyRexxComp.cmp.rex has 
been created"
all went well with: MyRexxComp.rex , MyRexxComp.cmp.rex has been created
    26 *-* End
    17 *-* DO I=1 TO N
       >V>     I => "4"
       >=>     I <= "5"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => "     PrimeV39         /* Rexx-Programm to analyze and 
compile */"
       >K>     "VALUE" => "     PrimeV39         /* Rexx-Programm to analyze 
and compile */"
       >>>     "     PrimeV39         /* Rexx-Programm to analyze and compile 
*/"
       >=>     REXXFILE1 <= "PrimeV39"
       >.>     "        /* Rexx-Programm to analyze and compile */"
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => "PrimeV39"
       >A>     "PrimeV39"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "Pr"
       >L>     "/*"
       >O>     "==" => "0"
       >>>     "0"
    20 *-*   if rexxFile1 = ""
       >V>     REXXFILE1 => "PrimeV39"
       >L>     ""
       >O>     "=" => "0"
       >>>     "0"
    21 *-*   rexxFile2=rexxFile1||".cmp.rex"
       >V>     REXXFILE1 => "PrimeV39"
       >L>     ".cmp.rex"
       >O>     "||" => "PrimeV39.cmp.rex"
       >>>     "PrimeV39.cmp.rex"
       >=>     REXXFILE2 <= "PrimeV39.cmp.rex"
    22 *-*   rexxFile1=rexxFile1||".rex"
       >V>     REXXFILE1 => "PrimeV39"
       >L>     ".rex"
       >O>     "||" => "PrimeV39.rex"
       >>>     "PrimeV39.rex"
       >=>     REXXFILE1 <= "PrimeV39.rex"
    23 *-*   address "" "rexxc" rexxFile1 rexxFile2 "-s"
       >L>     "rexxc"
       >V>     REXXFILE1 => "PrimeV39.rex"
       >O>     " " => "rexxc PrimeV39.rex"
       >V>     REXXFILE2 => "PrimeV39.cmp.rex"
       >O>     " " => "rexxc PrimeV39.rex PrimeV39.cmp.rex"
       >L>     "-s"
       >O>     " " => "rexxc PrimeV39.rex PrimeV39.cmp.rex -s"
       >>>     "rexxc PrimeV39.rex PrimeV39.cmp.rex -s"
    24 *-*   if rc=0
       >V>     RC => "0"
       >L>     "0"
       >O>     "=" => "1"
       >>>     "1"
    24 *-*     then
    24 *-*       say "all went well with:" rexxFile1 "," rexxFile2 "has been 
created"
       >L>         "all went well with:"
       >V>         REXXFILE1 => "PrimeV39.rex"
       >O>         " " => "all went well with: PrimeV39.rex"
       >L>         ","
       >O>         " " => "all went well with: PrimeV39.rex ,"
       >V>         REXXFILE2 => "PrimeV39.cmp.rex"
       >O>         " " => "all went well with: PrimeV39.rex , PrimeV39.cmp.rex"
       >L>         "has been created"
       >O>         " " => "all went well with: PrimeV39.rex , PrimeV39.cmp.rex 
has been created"
       >>>         "all went well with: PrimeV39.rex , PrimeV39.cmp.rex has 
been created"
all went well with: PrimeV39.rex , PrimeV39.cmp.rex has been created
    26 *-* End
    17 *-* DO I=1 TO N
       >V>     I => "5"
       >=>     I <= "6"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => "/*   Test1    */      /* Rexx-Programm to analyze and 
compile */"
       >K>     "VALUE" => "/*   Test1    */      /* Rexx-Programm to analyze 
and compile */"
       >>>     "/*   Test1    */      /* Rexx-Programm to analyze and compile 
*/"
       >=>     REXXFILE1 <= "/*"
       >.>     "  Test1    */      /* Rexx-Programm to analyze and compile */"
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => "/*"
       >A>     "/*"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "/*"
       >L>     "/*"
       >O>     "==" => "1"
       >>>     "1"
    19 *-*     then
    19 *-*       iterate   /* line begins with comment */
    17 *-* DO I=1 TO N
       >V>     I => "6"
       >=>     I <= "7"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => "/*   Test2    */      /* Rexx-Programm to analyze and 
compile */"
       >K>     "VALUE" => "/*   Test2    */      /* Rexx-Programm to analyze 
and compile */"
       >>>     "/*   Test2    */      /* Rexx-Programm to analyze and compile 
*/"
       >=>     REXXFILE1 <= "/*"
       >.>     "  Test2    */      /* Rexx-Programm to analyze and compile */"
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => "/*"
       >A>     "/*"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "/*"
       >L>     "/*"
       >O>     "==" => "1"
       >>>     "1"
    19 *-*     then
    19 *-*       iterate   /* line begins with comment */
    17 *-* DO I=1 TO N
       >V>     I => "7"
       >=>     I <= "8"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => "/*   Test4    */      /* Rexx-Programm to analyze and 
compile */"
       >K>     "VALUE" => "/*   Test4    */      /* Rexx-Programm to analyze 
and compile */"
       >>>     "/*   Test4    */      /* Rexx-Programm to analyze and compile 
*/"
       >=>     REXXFILE1 <= "/*"
       >.>     "  Test4    */      /* Rexx-Programm to analyze and compile */"
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => "/*"
       >A>     "/*"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "/*"
       >L>     "/*"
       >O>     "==" => "1"
       >>>     "1"
    19 *-*     then
    19 *-*       iterate   /* line begins with comment */
    17 *-* DO I=1 TO N
       >V>     I => "8"
       >=>     I <= "9"
    18 *-*   Parse VALUE LINEIN("MyRexxComp.ini") with rexxFile1 .
       >L>     "MyRexxComp.ini"
       >A>     "MyRexxComp.ini"
       >F>     LINEIN => "/*   Lotto3   */      /* Rexx-Programm to analyze and 
compile */ "
       >K>     "VALUE" => "/*   Lotto3   */      /* Rexx-Programm to analyze 
and compile */ "
       >>>     "/*   Lotto3   */      /* Rexx-Programm to analyze and compile 
*/ "
       >=>     REXXFILE1 <= "/*"
       >.>     "  Lotto3   */      /* Rexx-Programm to analyze and compile */ "
    19 *-*   if substr(rexxFile1,1,2) == "/*"
       >V>     REXXFILE1 => "/*"
       >A>     "/*"
       >L>     "1"
       >A>     "1"
       >L>     "2"
       >A>     "2"
       >F>     SUBSTR => "/*"
       >L>     "/*"
       >O>     "==" => "1"
       >>>     "1"
    19 *-*     then
    19 *-*       iterate   /* line begins with comment */
    17 *-* DO I=1 TO N
       >V>     I => "9"
       >=>     I <= "10"
    28 *-* Address Command "sleep 10"
       >L>   "sleep 10"
       >>>   "sleep 10"
    29 *-* exit


Attachment: MyRexxComp.rex
Description: Binary data

Attachment: MyRexxComp.ini
Description: Binary data

_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to