Skip to content

Instantly share code, notes, and snippets.

@Icelandjack
Icelandjack / Binary.hs
Created September 1, 2017 09:37 — forked from ndmitchell/Binary.hs
Binary existentials
{-# LANGUAGE StaticPointers #-}
{-# LANGUAGE InstanceSigs #-}
{-# LANGUAGE ExistentialQuantification #-}
{-# LANGUAGE ScopedTypeVariables #-}
import Data.Binary
import Data.Typeable
import System.IO.Unsafe
import GHC.StaticPtr