From 73c5cce8799dca16cd9fcba756bac3c4747a0624 Mon Sep 17 00:00:00 2001 From: Taylor Date: Thu, 16 Jan 2025 03:09:38 -0600 Subject: [PATCH] .ghci files for easy ghci launch --- src/.ghci | 2 +- src/.gitkeep | 0 src/Main.hs | 3 --- src/Push.hs | 3 ++- tests/Main.hs | 1 + 5 files changed, 4 insertions(+), 5 deletions(-) delete mode 100644 src/.gitkeep diff --git a/src/.ghci b/src/.ghci index d1da4d1..44a0883 100644 --- a/src/.ghci +++ b/src/.ghci @@ -1,3 +1,3 @@ :set stop :list :set prompt "\ESC[1;34m%s \ESC[0;35mλ>\ESC[m " -:load Push GP +:load Main diff --git a/src/.gitkeep b/src/.gitkeep deleted file mode 100644 index e69de29..0000000 diff --git a/src/Main.hs b/src/Main.hs index 8de7680..56457c9 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -1,6 +1,3 @@ -module Main where - -import Control.Exception (assert) import GP import Push diff --git a/src/Push.hs b/src/Push.hs index 627839b..348ec56 100644 --- a/src/Push.hs +++ b/src/Push.hs @@ -1,8 +1,9 @@ module Push where --- import Debug.Trace (trace, traceStack) import qualified Data.Map as Map +-- import Debug.Trace (trace, traceStack) + -- The exec stack must store heterogenous types, -- and we must be able to detect that type at runtime. -- One solution is for the exec stack to be a list of [Gene]. diff --git a/tests/Main.hs b/tests/Main.hs index 9637e45..fb115b6 100644 --- a/tests/Main.hs +++ b/tests/Main.hs @@ -1,5 +1,6 @@ import Control.Exception (assert) import qualified Data.Map as Map +import GP import Push import Test.Hspec import Test.Hspec.QuickCheck