Egg/fastfood-hs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Small thing

Browse source
This commit is contained in:
Nox Sluijtman 2024-03-12 20:55:47 +01:00
parent 097b70795f
commit d6fd426d31
2 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
app/Main.hs
View file

@ -2,10 +2,11 @@ module Main where
import System.Random import System.Random
data Fastfood = Friet data Fastfood = Kapsalon
| Kapsalon
| Pizza | Pizza
| Lasagne | Lasagne
| Nachos
| Durum
deriving (Show, Eq, Ord, Enum, Read, Bounded) deriving (Show, Eq, Ord, Enum, Read, Bounded)
instance Random Fastfood where instance Random Fastfood where

2
fastfood-hs.cabal
View file

@ -20,6 +20,6 @@ executable what-should-i-eat
main-is: Main.hs main-is: Main.hs
-- other-modules: -- other-modules:
-- other-extensions: -- other-extensions:
build-depends: base ^>=4.17.2.1, random build-depends: base ^>=4.17.2.1, random, time
hs-source-dirs: app hs-source-dirs: app
default-language: Haskell2010 default-language: Haskell2010