TESTING "Component Test Suite: Proc-Layer controller" ./test-suite --group=controller




TEST "CommandBasic_test" CommandBasic_test <<END
END


TEST "Argument & Memento handling" CommandArgument_test <<END
out: Command-State. arguments=unbound, ·noUNDO·.
out: capture state...
out: Command-State. arguments=Closure\(\), ·noUNDO·.
out: Command-State. arguments=Closure\(.\), ·noUNDO·.
out: Command-State. arguments=Closure\(.,.+s.*\), ·noUNDO·.
out: Command-State. arguments=Closure\(.+s.*,glorious,..\), <mem: destruction>.
out: would be serialised.....Command-State. arguments=Closure\(\), ·noUNDO·.
out: would be serialised.....Command-State. arguments=Closure\(.\), ·noUNDO·.
out: would be serialised.....Command-State. arguments=Closure\(.,.+s.*\), ·noUNDO·.
out: would be serialised.....Command-State. arguments=Closure\(.+s.*,glorious,..\), <mem: destruction>.
out: sizeof\( .+control1.ArgumentHolder.+ \) = .+
out: Command-State. arguments=Closure\(.+s.*,Lumiera rocks,..\), ·noUNDO·.
out: capture state...
out: captured state: START...Lumiera rocks
out: Command-State. arguments=Closure\(.+s.*,Lumiera rocks,..\), <mem: START...Lumiera rocks>.
out: invoke operation...
out: START...doIt\( Time=.+s.* "Lumiera rocks" rand=.. \)
out: undo... memento=START...Lumiera rocks
out: START...doIt\( Time=.+s.* "Lumiera rocks" rand=.. \)undoIt\(time=0:..:....00\)----memento-:START...Lumiera rocks
out: capture state...
out: modified: Command-State. arguments=Closure\(123ms,unbelievable,..\), <mem: START...doIt\( Time=.+s.* "Lumiera rocks" rand=.. \)undoIt\(time=0:..:....00\)----memento-:START...Lumiera rocksLumiera rocks>.
out: copied  : Command-State. arguments=Closure\(.+s.*,Lumiera rocks,..\), <mem: START...Lumiera rocks>.
out: undo... memento=START...doIt\( Time=.+s.* "Lumiera rocks" rand=.. \)undoIt\(time=0:..:....00\)----memento-:START...Lumiera rocksLumiera rocks
out: RESET...undoIt\(time=0:..:....00\)----memento-:START...doIt\( Time=.+s.* "Lumiera rocks" rand=.. \)undoIt\(time=0:..:....00\)----memento-:START...Lumiera rocksLumiera rocks
END


TEST "build argument accepting function" ArgumentTupleAccept_test <<END
out: sizeof\( .+control.+TestClass.+ \) =   1
out: sizeof\( .+control.+TestClass.+lib.time.TimeVar.+ \) =  (12|16)
out: 0:..:..\..00
return: 0
END


TEST "Command functor and UNDO functor" CommandMutation_test <<END
out: empty placeholder closure: Closure\(0\)
out: param values: Closure\(23\)
out: saved state: 11
END


TEST "Memento wiring and storage" MementoTie_test <<END
return: 0
END


TEST "Opaque cloning of implementation" CommandCloneBuilder_test <<END
return: 0
END


TEST "Equality comparisons" CommandEquality_test <<END
return: 0
END


TEST "Command index and allocation" CommandRegistry_test <<END
return: 0
END


TEST "Handling Pattern basics" HandlingPatternBasics_test <<END
return: 0
END


PLANNED "Handling Patterns" HandlingPatternStandardImpl_test <<END
return: 0
END


TEST "Command argument binding" CommandBinding_test <<END
out: Command\("test.command3.2"\) \{exec\}
return: 0
END


TEST "Command usage aspects I"  CommandUse1_test <<END
out: Command\("test.command1.1"\) \{undo\}
out: Command\("test.command1.2"\) \{undo\}
out: Command\("test.command1.3"\) \{undo\}
out: Command\("test.command1.4"\) \{undo\}
out: Command\(_xxx_\) NIL
out: Command\("test.command1.5"\) \{def\}
out: Command\("test.command1.5"\) \{exec\}
out: Command\("test.command1.5"\) \{undo\}
return: 0
END


PLANNED "Command usage aspects II" CommandUse2_test <<END
return: 0
END


PLANNED "Command usage aspects III" CommandUse3_test <<END
return: 0
END