Initially I've deliberately omitted those, to nudge towards using time quantisation and TCode formatting for any external representation of time values. While this recommendation is still valid, the overloaded string conversion turns out to be helpful for unit testing and diagnostics in compound data structures. See Record<GenNode>
109 lines
3.5 KiB
Text
109 lines
3.5 KiB
Text
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
|