track action applications

[scpubgit/DX.git] / lib / DX / Hypothesis.pm

diff --git a/lib/DX/Hypothesis.pm b/lib/DX/Hypothesis.pm
index 71477e8..314cc74 100644 (file)
--- a/lib/DX/Hypothesis.pm
+++ b/lib/DX/Hypothesis.pm
@@ -19,6 +19,10 @@ has actions => (
   is => 'ro', isa => ArrayRef[Action], required => 1
 );
 
+has action_applications => (
+  is => 'ro', isa => ArrayRef[Action], required => 1
+);
+
 has action_policy => (is => 'ro', isa => ActionPolicy, required => 1);
 
 sub head_proposition { shift->outstanding_propositions->[0] }
@@ -55,6 +59,7 @@ sub but_recheck_for {
     resolved_propositions => DX::ResolvedPropositionSet->new_empty,
     outstanding_propositions => \@recheck,
     actions => [],
+    action_applications => [],
     action_policy => $ap,
   );