From 063b4169d14653560dce65792a07c1a65ce987af Mon Sep 17 00:00:00 2001 From: Sridhar Ratnakumar <3998+srid@users.noreply.github.com> Date: Sat, 11 Jan 2025 20:02:39 -0500 Subject: [PATCH] Use `StrictData` (#147) Run this command to get the path to the stan report, ``` echo $(nix build --print-out-paths)/stan.html ``` --- flake.lock | 6 +++--- haskell-template.cabal | 1 + src/Main.hs | 6 ++++++ 3 files changed, 10 insertions(+), 3 deletions(-) diff --git a/flake.lock b/flake.lock index dc816a1..459d869 100644 --- a/flake.lock +++ b/flake.lock @@ -53,11 +53,11 @@ }, "haskell-flake": { "locked": { - "lastModified": 1734464164, - "narHash": "sha256-5JCCyrgy7IMnipyYMQzIAXncGt2XVlW1aK71A+FTXDs=", + "lastModified": 1734703440, + "narHash": "sha256-QQbB7e9DQwKCjuLIMQjd9KTpeyvssK9muNAS7hR98y0=", "owner": "srid", "repo": "haskell-flake", - "rev": "e280b39efdd72b6a5bdaa982b67f150c819be642", + "rev": "72a4c403230c4b8bcfa5571c3b7e76253fc8d966", "type": "github" }, "original": { diff --git a/haskell-template.cabal b/haskell-template.cabal index ad695c6..d7782cf 100644 --- a/haskell-template.cabal +++ b/haskell-template.cabal @@ -41,6 +41,7 @@ common shared MultiWayIf NoStarIsType OverloadedStrings + StrictData TypeFamilies ViewPatterns diff --git a/src/Main.hs b/src/Main.hs index 52a9767..d8b3d4f 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -2,6 +2,12 @@ module Main where import Main.Utf8 qualified as Utf8 +data Example = Example + { name :: Text + , age :: Int + } + deriving stock (Show, Eq) + {- | Main entry point.