DUP and MINUS WITH;
New line to for NOP or ?
::resource "nop;empty 0" or ?
::resource "nop" ?
Searching for test containers..
Executing automated test suite 96 *-* source =
.TemporaryTestFile~new(self, self~testSource)
>E> .TEMPORARYTESTFILE => "The TEMPORARYTESTFILE class"
>V> SELF => "a rexxc.testGroup"
>A> "a rexxc.testGroup"
>V> SELF => "a rexxc.testGroup"
>M> "TESTSOURCE" => "test_rexxc.rex"
>A> "test_rexxc.rex"
>M> "NEW" => "a TEMPORARYTESTFILE"
>>> "a TEMPORARYTESTFILE"
>=> SOURCE <= "a TEMPORARYTESTFILE"
97 *-* do resource over .resources
>E> .RESOURCES => "a StringTable"
>K> "OVER" => "a StringTable"
>=> RESOURCE <= "EMPTY 0"
>>> "EMPTY 0"
98 *-* source~createFromResource(resource)
>V> SOURCE => "a TEMPORARYTESTFILE"
>V> RESOURCE => "EMPTY 0"
>A> "EMPTY 0"
99 *-* address "" "rexxc" self~q(source~fullName)
>L> "rexxc"
>V> SELF => "a rexxc.testGroup"
>V> SOURCE => "a TEMPORARYTESTFILE"
>M> "FULLNAME" =>
"/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>A>
"/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>M> "Q" =>
"/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>O> " " => "rexxc
/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>>> "rexxc
/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
Open Object Rexx Version 5.0.0
Build date: Dec 7 2018
Addressing mode: 64
Copyright (c) 1995, 2004 IBM Corporation. All rights reserved.
Copyright (c) 2005-2018 Rexx Language Association. All rights reserved.
This program and the accompanying materials are made available under the
terms
of the Common Public License v1.0 which accompanies this distribution or at
http://www.oorexx.org/license.html
100 *-* address "" "rexxc" self~q(source~fullName) with output
stem s. error stem e.
>L> "rexxc"
>V> SELF => "a rexxc.testGroup"
>V> SOURCE => "a TEMPORARYTESTFILE"
>M> "FULLNAME" =>
"/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>A>
"/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>M> "Q" =>
"/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>O> " " => "rexxc
/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>>> "rexxc
/export/home/agrellum/oorexx-test/ooRexx/utilities/rexxc/test_rexxc.rex"
>V> S. => "S."
>K> "OUTPUT" => "S."
>V> E. => "E."
>K> "ERROR" => "E."
101 *-* self~assertRc(0, rc, "'"resource"' Rexx code expected to
compile with rc 0")
>V> SELF => "a rexxc.testGroup"
>L> "0"
>A> "0"
>V> RC => "0"
>A> "0"
>L> "'"
>V> RESOURCE => "EMPTY 0"
>O> "" => "'EMPTY 0"
>L> "' Rexx code expected to compile with rc 0"
>O> "" => "'EMPTY 0' Rexx code expected to compile with rc 0"
>A> "'EMPTY 0' Rexx code expected to compile with rc 0"
102 *-* self~assertTrue(s.0 > 0, "rexxc" self~testSource "is
expected to produce a few lines of output")
>V> SELF => "a rexxc.testGroup"
>C> S.0 => "S.0"
>V> S.0 => "0"
>L> "0"
>O> ">" => "0"
>A> "0"
>L> "rexxc"
>V> SELF => "a rexxc.testGroup"
>M> "TESTSOURCE" => "test_rexxc.rex"
>O> " " => "rexxc test_rexxc.rex"
>L> "is expected to produce a few lines of output"
>O> " " => "rexxc test_rexxc.rex is expected to produce a
few lines of output"
>A> "rexxc test_rexxc.rex is expected to produce a few lines
of output"
..
ooTest Framework - Automated Test of the ooRexx Interpreter
Interpreter: REXX-ooRexx_5.0.0(MT)_64-bit 6.05 7 Dec 2018
OS Name: SUNOS
SysVersion: SunOS illumos-3e90f8d31d.5.11
Tests ran: 12
Assertions: 15
Failures: 3
Errors: 0
[failure] [20181207 14:06:55.387878]
svn: r11562 Change date: 2018-12-03 23:45:29 +0100
Test: TEST_REXXC_ONE_ARG
Class: rexxc.testGroup
File: /export/home/agrellum/.../ooRexx/utilities/rexxc/rexxc.testGroup
Line: 102
Failed: assertTrue
Expected: [1]
Actual: [[0], identityHash="-7113985"]
Message: rexxc test_rexxc.rex is expected to produce a few lines
of output
[failure] [20181207 14:06:55.539058]
svn: r11562 Change date: 2018-12-03 23:45:29 +0100
Test: TEST_REXXC_ONE_ARG_SYNTAX
Class: rexxc.testGroup
File: /export/home/agrellum/.../ooRexx/utilities/rexxc/rexxc.testGroup
Line: 91
Failed: assertTrue
Expected: [1]
Actual: [[0], identityHash="-7113985"]
Message: rexxc is expected to produce a few lines of output
[failure] [20181207 14:06:55.604235]
svn: r11562 Change date: 2018-12-03 23:45:29 +0100
Test: TEST_REXXC_TWO_ARGS
Class: rexxc.testGroup
File: /export/home/agrellum/.../ooRexx/utilities/rexxc/rexxc.testGroup
Line: 127
Failed: assertTrue
Expected: [1]
Actual: [[0], identityHash="-7113985"]
Message: a few lines of output expected from rexxc 'EMPTY 0'
File search: 00:00:00.007748
Suite construction: 00:00:00.000992
Test execution: 00:00:00.351876
Total time: 00:00:01.006787
_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel
