2019-02-05 02:44:07 +02:00
|
|
|
-cases [Valid] 'inter/Tests/Valid'
|
|
|
|
-cases [Invalid] 'inter/Tests/Invalid'
|
2019-07-20 14:40:27 +03:00
|
|
|
-cases [General] 'inter/Tests/General'
|
2019-07-21 02:10:05 +03:00
|
|
|
-cases [PipelineErrors] 'inter/Tests/PipelineErrors'
|
2019-05-01 00:59:36 +03:00
|
|
|
-cases [Units] 'inter/Tests/Units'
|
2019-02-05 02:44:07 +02:00
|
|
|
|
|
|
|
-recipe [Valid]
|
|
|
|
|
|
|
|
set: $O = $PATH/$CASE.intert
|
|
|
|
set: $A = $PATH/_Textual/$CASE.intert
|
|
|
|
set: $B = $PATH/_Binary/$CASE.interb
|
|
|
|
set: $T = $PATH/_Console/$CASE.txt
|
|
|
|
|
2019-02-09 12:26:44 +02:00
|
|
|
mkdir: $PATH/_Textual
|
|
|
|
mkdir: $PATH/_Binary
|
|
|
|
mkdir: $PATH/_Console
|
|
|
|
|
2019-02-05 02:44:07 +02:00
|
|
|
step: inter/Tangled/inter $O -binary $B >$T 2>&1
|
|
|
|
or: 'produced errors in inter' $T
|
|
|
|
|
|
|
|
step: inter/Tangled/inter $B -textual $A >$T 2>&1
|
|
|
|
or: 'produced errors in inter' $T
|
|
|
|
|
|
|
|
show: $A
|
|
|
|
|
|
|
|
match text: $A $O
|
|
|
|
or: 'produced incorrect output'
|
|
|
|
|
|
|
|
-end
|
|
|
|
|
|
|
|
-recipe [Invalid]
|
|
|
|
|
|
|
|
set: $O = $PATH/$CASE.intert
|
|
|
|
set: $A = $PATH/_Results_Actual/$CASE.txt
|
|
|
|
set: $I = $PATH/_Results_Ideal/$CASE.txt
|
|
|
|
|
2019-02-09 12:26:44 +02:00
|
|
|
mkdir: $PATH/_Results_Actual
|
|
|
|
mkdir: $PATH/_Results_Ideal
|
|
|
|
|
2019-02-05 02:44:07 +02:00
|
|
|
fail step: inter/Tangled/inter $O >$A 2>&1
|
|
|
|
or: 'failed to produce error message' $A
|
|
|
|
show: $A
|
|
|
|
exists: $I
|
|
|
|
or: 'produced error(s), but no ideal transcript existed'
|
|
|
|
match text: $A $I
|
|
|
|
or: 'produced the wrong error message(s)'
|
|
|
|
|
|
|
|
-end
|
|
|
|
|
2019-07-20 14:40:27 +03:00
|
|
|
-recipe [General]
|
2019-02-05 02:44:07 +02:00
|
|
|
|
|
|
|
set: $O = $PATH/$CASE.intert
|
2019-07-20 14:40:27 +03:00
|
|
|
set: $P = $PATH/_Pipelines/$CASE.interpipeline
|
2019-02-05 02:44:07 +02:00
|
|
|
set: $A = $PATH/_Results_Actual/$CASE.txt
|
|
|
|
set: $I = $PATH/_Results_Ideal/$CASE.txt
|
|
|
|
set: $T = $PATH/_Console/$CASE.txt
|
|
|
|
|
2019-02-09 12:26:44 +02:00
|
|
|
mkdir: $PATH/_Results_Actual
|
|
|
|
mkdir: $PATH/_Results_Ideal
|
|
|
|
mkdir: $PATH/_Console
|
|
|
|
|
2019-07-20 14:40:27 +03:00
|
|
|
step: inter/Tangled/inter -variable '*in=$O' -variable '*out=$A' -pipeline-file $P >$T 2>&1
|
2019-02-05 02:44:07 +02:00
|
|
|
or: 'failed to produce output' $T
|
|
|
|
|
|
|
|
show: $A
|
|
|
|
|
|
|
|
match text: $A $I
|
|
|
|
or: 'produced incorrect output'
|
|
|
|
|
|
|
|
-end
|
2019-05-01 00:59:36 +03:00
|
|
|
|
2019-07-21 02:10:05 +03:00
|
|
|
-recipe [PipelineErrors]
|
|
|
|
|
|
|
|
set: $O = $PATH/$CASE.intert
|
|
|
|
set: $P = $PATH/$CASE.interpipeline
|
|
|
|
set: $A = $PATH/_Results_Actual/$CASE.txt
|
|
|
|
set: $I = $PATH/_Results_Ideal/$CASE.txt
|
|
|
|
|
|
|
|
mkdir: $PATH/_Results_Actual
|
|
|
|
mkdir: $PATH/_Results_Ideal
|
|
|
|
|
|
|
|
fail step: inter/Tangled/inter -variable '*in=$O' -pipeline-file $P >$A 2>&1
|
|
|
|
or: 'failed to produce errors' $A
|
|
|
|
|
|
|
|
show: $A
|
|
|
|
|
|
|
|
match text: $A $I
|
|
|
|
or: 'produced incorrect errors'
|
|
|
|
|
|
|
|
-end
|
|
|
|
|
2019-05-01 00:59:36 +03:00
|
|
|
-recipe [Units]
|
|
|
|
|
|
|
|
set: $O = $PATH/$CASE.txt
|
|
|
|
set: $A = $PATH/_Results_Actual/$CASE.txt
|
|
|
|
set: $I = $PATH/_Results_Ideal/$CASE.txt
|
|
|
|
|
|
|
|
mkdir: $PATH/_Results_Actual
|
|
|
|
mkdir: $PATH/_Results_Ideal
|
|
|
|
mkdir: $PATH/_Console
|
|
|
|
|
|
|
|
step: inter/Tangled/inter -test $O >$A 2>&1
|
|
|
|
or: 'failed to produce output' $A
|
|
|
|
|
|
|
|
show: $A
|
|
|
|
|
|
|
|
match text: $A $I
|
|
|
|
or: 'produced incorrect output'
|
|
|
|
|
|
|
|
-end
|