Skip to content

Instantly share code, notes, and snippets.

View Swordlash's full-sized avatar

Mateusz Goślinowski Swordlash

View GitHub Profile
{-# LANGUAGE OverloadedStrings #-}
module Main where
import Foreign.C.String
import Foreign.Ptr
import Control.Monad (forM_)
import Text.Blaze.Html5 as H
import Text.Blaze.Html5.Attributes as A
import Text.Blaze.Html.Renderer.Pretty
{-# LANGUAGE
BangPatterns,
GADTs,
TypeFamilies,
FlexibleInstances,
UndecidableInstances,
MultiParamTypeClasses,
StandaloneDeriving,
DeriveFunctor,
DerivingVia,
@Swordlash
Swordlash / patterns.hs
Created August 10, 2022 15:10
Patterns
{-# LANGUAGE PatternSynonyms
, GADTs
, TypeApplications
, RankNTypes
, ScopedTypeVariables
, ViewPatterns
#-}
-- GADT of possible types
data Type a where