summaryrefslogtreecommitdiff
path: root/source/Test/Unit/Kernel.hs
diff options
context:
space:
mode:
Diffstat (limited to 'source/Test/Unit/Kernel.hs')
-rw-r--r--source/Test/Unit/Kernel.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/source/Test/Unit/Kernel.hs b/source/Test/Unit/Kernel.hs
index c24debf..d01a194 100644
--- a/source/Test/Unit/Kernel.hs
+++ b/source/Test/Unit/Kernel.hs
@@ -430,7 +430,8 @@ replaysDirectInductiveFacts = do
:| [ Inductive.DirectInductiveClause
[x]
[Inductive.DirectRecursiveCondition
- (Internal.TermVar x)]
+ (Internal.TermVar x)
+ (Inductive.directRecursiveCarrierContext Nowhere)]
(Internal.TermVar x)
]
)