Shuffle things around and create a demo

This commit is contained in:
2021-11-11 21:15:17 +02:00
parent caafd820b6
commit b73c4cfd1b
13 changed files with 93 additions and 27 deletions

View File

@ -0,0 +1,5 @@
# Revision history for FeedMonad-demo
## 0.1.0.0 -- YYYY-mm-dd
* First version. Released on an unsuspecting world.

View File

@ -0,0 +1,38 @@
cabal-version: 2.4
name: FeedMonad-demo
version: 0.1.0.0
-- A short (one-line) description of the package.
-- synopsis:
-- A longer description of the package.
-- description:
-- A URL where users can report bugs.
-- bug-reports:
-- The license under which the package is released.
-- license:
author: Mats Rauhala
maintainer: mats.rauhala@iki.fi
-- A copyright notice.
-- copyright:
-- category:
extra-source-files: CHANGELOG.md
executable FeedMonad-demo
main-is: Main.hs
-- Modules included in this executable, other than Main.
-- other-modules:
-- LANGUAGE extensions used by modules in this package.
-- other-extensions:
build-depends:
base ^>=4.14.3.0,
FeedMonad,
containers
hs-source-dirs: app
default-language: Haskell2010

View File

@ -0,0 +1,9 @@
{-# LANGUAGE OverloadedStrings #-}
module Main where
import FeedMonad
import Data.Category
main :: IO ()
main = do
defaultMain defaultConfig{feeds = [ Category "News" [] ]}

View File

@ -0,0 +1,11 @@
{ mkDerivation, base, FeedMonad, lib }:
mkDerivation {
pname = "FeedMonad-demo";
version = "0.1.0.0";
src = ./.;
isLibrary = false;
isExecutable = true;
executableHaskellDepends = [ base FeedMonad ];
license = "unknown";
hydraPlatforms = lib.platforms.none;
}

View File

@ -0,0 +1,4 @@
module MyLib (someFunc) where
someFunc :: IO ()
someFunc = putStrLn "someFunc"