1 files changed, 12 insertions, 3 deletions

diff --git a/haskell/examples/testdiff.hs b/haskell/examples/testdiff.hs
index 9d580ba..08229d3 100644
--- a/haskell/examples/testdiff.hs
+++ b/haskell/examples/testdiff.hs
@@ -17,7 +17,7 @@ delta :: Result VCDIFF
 delta = computeDiff defaultConfig source target
 
 delta2 :: Result VCDIFF
-delta2 = computeDiff defaultConfig  source target
+delta2 = computeDiff defaultConfig source target
 
 delta3 :: Result VCDIFF
 delta3 = computeDiff defaultConfig { flags = XD3_ADLER32 } source target
@@ -25,6 +25,9 @@ delta3 = computeDiff defaultConfig { flags = XD3_ADLER32 } source target
 delta4 :: Result VCDIFF
 delta4 = computeDiff defaultConfig { flags = XD3_ADLER32 } source target
 
+delta5 :: Result VCDIFF
+delta5 = computeDiff defaultConfig { flags = XD3_ADLER32 } source target
+
 
 
 dump title bs kont = do
@@ -35,14 +38,20 @@ dump title bs kont = do
 main = do
     dump "source" source $ putStrLn ""
     dump "target" target $ putStrLn ""
-    go source "default" delta
-    go source "default" delta2
     go source "XD3_ADLER32" delta3
     go source "XD3_ADLER32" delta4
+    go source "XD3_ADLER32" delta5
+    go source "default" delta
+    go source "default" delta2
+    {-
     go source2 "default" delta
     go source2 "default" delta2
     go source2 "XD3_ADLER32" delta3
     go source2 "XD3_ADLER32" delta4
+    -}
+    print source
+    print source2
+    print target
 
 go source flgs delta = do
     putStrLn ""