From 94bc4f1faab32bf2cc9145244ecd994760fc1a76 Mon Sep 17 00:00:00 2001 From: Felix Dilke Date: Tue, 27 Jan 2026 17:27:32 +0000 Subject: [PATCH] more tidying --- haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs b/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs index cea6bfb..544326b 100644 --- a/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs +++ b/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs @@ -45,8 +45,9 @@ spec = do [ "parent(\"alice\", \"bob\")." , "parent(\"bob\", \"carol\")." ] - [ "ancestor(X,Y) :- parent(X,Y)." - , "ancestor(X,Y) :- parent(X,Z), ancestor(Z,Y)." + [ + "ancestor(X,Y) :- parent(X,Z), ancestor(Z,Y)." + , "ancestor(X,Y) :- parent(X,Y)." ] parentRelation = Relation