Source position: testinsightprotocol.pp line 34
type TTestPhase = (
tpSetUp,
tpRunTest,
spTearDown,
tpNothing
);