ref: b2db88b8e9beada967f6abf1b85bd8e8999baef1
parent: 64d12f8de6fe4fd8bacda105844a82e8c485cd4a
author: Lennart Augustsson <lennart.augustsson@epicgames.com>
date: Sun Nov 26 06:34:21 EST 2023
Set up target to cache all of lib/
--- a/Makefile
+++ b/Makefile
@@ -18,7 +18,7 @@
GHCPROF= # -prof -fprof-late #-prof -fprof-auto
GHCFLAGS= $(GHCEXTS) $(GHCINCS) $(GHCWARNS) $(GHCOPTS) $(GHCTOOL) $(GHCPKGS) $(GHCOUT) $(GHCPROF)
#
-.PHONY: clean bootstrap install ghcgen newmhs cacheprelude timecompile exampletest
+.PHONY: clean bootstrap install ghcgen newmhs cachelib timecompile exampletest
all: bin/mhs
@@ -85,9 +85,9 @@
time bin/mhs +RTS -v -RTS -isrc MicroHs.Main
#
-cacheprelude:
- @mkdir -p cache
- bin/mhs -c Prelude -ocache/Prelude.comb
+cachelib:
+ @-rm .mhscache
+ bin/mhs -c AllOfLib
#
clean:
--- /dev/null
+++ b/lib/AllOfLib.hs
@@ -1,0 +1,70 @@
+module AllOfLib(main) where
+-- Only used to save the compilation cache.
+import Compat
+import Control.Alternative
+import Control.Applicative
+import Control.DeepSeq
+import Control.Error
+import Control.Exception
+import Control.Monad
+import Control.Monad.State.Strict
+import Data.Bits
+import Data.Bool
+import Data.Bool_Type
+import Data.Bounded
+import Data.Char
+import Data.Char_Type
+import Data.Complex
+import Data.Double
+import Data.Either
+import Data.Enum
+import Data.Eq
+import Data.Floating
+import Data.Fractional
+import Data.Function
+import Data.Functor
+import Data.Functor.Identity
+import Data.Int
+import Data.IntMap
+import Data.IntSet
+import Data.Integer
+import Data.Integer_Type
+import Data.Integral
+import Data.List
+import Data.List_Type
+import Data.Map
+import Data.Maybe
+import Data.Maybe_Type
+import Data.Monoid
+import Data.Num
+import Data.Ord
+import Data.Ordering_Type
+import Data.Ratio
+import Data.Ratio_Type
+import Data.Real
+import Data.RealFloat
+import Data.Semigroup
+import Data.Tuple
+import Data.Word
+import Debug.Trace
+import Foreign.C.String
+import Foreign.Marshal.Alloc
+import Foreign.Ptr
+import Foreign.Storable
+import GHC.Stack
+import GHC.Types
+import Prelude
+import Primitives
+import System.Console.SimpleReadline
+import System.Directory
+import System.Environment
+import System.IO
+import System.IO.MD5
+import System.Process
+import Text.PrettyPrint.HughesPJ
+import Text.Show
+import Text.String
+import Unsafe.Coerce
+
+main :: IO ()
+main = return ()
--- a/lib/Data/Semigroup.hs
+++ b/lib/Data/Semigroup.hs
@@ -1,5 +1,5 @@
-module Data.Semigroup(Data.Semigroup) where
-import Primitive
+module Data.Semigroup(module Data.Semigroup) where
+import Primitives
infixr 6 <>
class Semigroup a where
--
⑨