From fb3d1040ddc579778889aab360cd759efe225613 Mon Sep 17 00:00:00 2001
From: Christian Gram Kalhauge <chrg@dtu.dk>
Date: Tue, 20 Feb 2024 15:32:19 +0100
Subject: [PATCH] Migrating rtree-c to the new model
---
.gitignore | 1 -
rtree-c/.ghci | 4 ++++
rtree-c/.hspec | 3 +++
rtree-c/package.yaml | 10 ++++------
rtree-c/test/src/Main.hs | 5 ++++-
rtree-c/test/src/ReduceCSpec.hs | 3 +++
rtree-c/test/src/Spec.hs | 1 +
7 files changed, 19 insertions(+), 8 deletions(-)
create mode 100644 rtree-c/.ghci
create mode 100644 rtree-c/.hspec
create mode 100644 rtree-c/test/src/ReduceCSpec.hs
create mode 100644 rtree-c/test/src/Spec.hs
diff --git a/.gitignore b/.gitignore
index 7ad9f18..4d00159 100644
--- a/.gitignore
+++ b/.gitignore
@@ -27,5 +27,4 @@ cabal.project.local~
result
a.out
-/rtree-c
test.c
diff --git a/rtree-c/.ghci b/rtree-c/.ghci
new file mode 100644
index 0000000..bdbdd4c
--- /dev/null
+++ b/rtree-c/.ghci
@@ -0,0 +1,4 @@
+:set -fwarn-unused-binds -fwarn-unused-imports
+:set -isrc -itest/src
+:load Main
+
diff --git a/rtree-c/.hspec b/rtree-c/.hspec
new file mode 100644
index 0000000..c2400d4
--- /dev/null
+++ b/rtree-c/.hspec
@@ -0,0 +1,3 @@
+--failure-report .hspec-failures
+--rerun
+--rerun-all-on-success
diff --git a/rtree-c/package.yaml b/rtree-c/package.yaml
index e2ad3d6..626ea07 100644
--- a/rtree-c/package.yaml
+++ b/rtree-c/package.yaml
@@ -42,9 +42,7 @@ tests:
dependencies:
- rtree
- rtree-c
- # - template
- # - hedgehog
- # - hspec
- # - hspec-discover
- # - hspec-expectations-pretty-diff
- # - hspec-hedgehog
+ - hspec
+ - hspec-discover
+ - hspec-expectations-pretty-diff
+ - hspec-glitter
diff --git a/rtree-c/test/src/Main.hs b/rtree-c/test/src/Main.hs
index 76a9bdb..87de4f4 100644
--- a/rtree-c/test/src/Main.hs
+++ b/rtree-c/test/src/Main.hs
@@ -1 +1,4 @@
-main = pure ()
+import qualified Spec
+
+main :: IO ()
+main = Spec.main
diff --git a/rtree-c/test/src/ReduceCSpec.hs b/rtree-c/test/src/ReduceCSpec.hs
new file mode 100644
index 0000000..1fe5d64
--- /dev/null
+++ b/rtree-c/test/src/ReduceCSpec.hs
@@ -0,0 +1,3 @@
+module ReduceCSpec where
+
+spec = pure ()
diff --git a/rtree-c/test/src/Spec.hs b/rtree-c/test/src/Spec.hs
new file mode 100644
index 0000000..5416ef6
--- /dev/null
+++ b/rtree-c/test/src/Spec.hs
@@ -0,0 +1 @@
+{-# OPTIONS_GHC -F -pgmF hspec-discover -optF --module-name=Spec #-}
--
GitLab