-cases [Inweb] 'inweb/Tests/Test Cases'
-cases [Painter] 'inweb/Tests/Test Painter'
-cases [Tree] 'inweb/Tests/Test Weave Tree'

-recipe [Inweb]
	set: $INWEB = inweb/Tangled/inweb
	set: $INTERNAL = Internal

	set: $WEB = $PATH/$CASE.inweb
	mkdir: $PATH/_Tangled_Actual
	mkdir: $PATH/_Tangled_Ideal
	mkdir: $PATH/_Tangled_Console
	set: $TA = $PATH/_Tangled_Actual/$CASE.txt
	set: $TI = $PATH/_Tangled_Ideal/$CASE.txt
	set: $TC = $PATH/_Tangled_Console/$CASE.txt
	step: $INWEB $WEB -no-ctags -tangle-to $TA >$TC 2>&1
	or: 'failed inweb' $TC
	show: $TA
	match text: $TA $TI
	or: 'produced the wrong tangled code'

	mkdir: $PATH/_Scan_Actual
	mkdir: $PATH/_Scan_Ideal
	set: $SA = $PATH/_Scan_Actual/$CASE.txt
	set: $SI = $PATH/_Scan_Ideal/$CASE.txt
	step: $INWEB $WEB -scan >$SA 2>&1
	or: 'failed inweb' $SA
	show: $SA
	match text: $SA $SI
	or: 'produced the wrong scan'

	pass: 'passed'

-end

-recipe [Painter]
	set: $INWEB = inweb/Tangled/inweb
	set: $LANGUAGES = inweb/Dialects
	set: $INTERNAL = Internal

	set: $CANVAS = $PATH/$CASE.txt
	mkdir: $PATH/_Results_Actual
	mkdir: $PATH/_Results_Ideal
	mkdir: $PATH/_Results_Console
	set: $A = $PATH/_Results_Actual/$CASE.txt
	set: $I = $PATH/_Results_Ideal/$CASE.txt
	step: $INWEB -no-ctags -locale console=utf-8 -test-language-on $CANVAS -test-language $LANGUAGES/$CASE.ildf >$A 2>&1
	or: 'failed inweb' $A
	show: $A
	match text: $A $I
	or: 'produced the wrong painting'

	pass: 'passed'

-end

-recipe [Tree]
	set: $INWEB = inweb/Tangled/inweb
	set: $LANGUAGES = inweb/Dialects
	set: $INTERNAL = Internal

	mkdir: $PATH/_Results_Actual
	mkdir: $PATH/_Results_Ideal
	mkdir: $PATH/_Results_Console
	set: $A = $PATH/_Results_Actual/$CASE.txt
	set: $I = $PATH/_Results_Ideal/$CASE.txt
	set: $C = $PATH/_Results_Console/$CASE.txt
	step: $INWEB -no-ctags $PATH/variations -weave S/$CASE -weave-as TestingInweb -weave-to $A >$C 2>&1
	or: 'failed inweb' $C
	show: $A
	match text: $A $I
	or: 'produced the wrong weave tree'

	pass: 'passed'

-end