Home

Awesome

GHC.Hotswap

Demonstrates how to build an application that can hot-swap parts of itself at runtime, using GHC. This is a standalone illustration of the technology used in production in the Sigma system at Facebook.

There are a handful of Haskell packages here:

ghc-hotswap

Shared object swapping goodness.

Demo

Quick Start

Build types

  1. cd ghc-hotswap-types
  2. cabal configure
  3. cabal install

Build hotswap

  1. cd ghc-hotswap
  2. cabal configure
  3. cabal install

Build so

  1. cd ghc-hotswap-so
  2. cabal configure --enable-library-for-ghci
  3. cabal build (Note the file path of dist/build/HSghc-hotswap-so(...).o)

Run demo

  1. cd ghc-hotswap-demo
  2. cabal configure
  3. cabal build
  4. cabal run <path of first .o file>

ghc-hotswap-types

Example library for common types between the main binary and shared object. The object code for this library will end up in the final binary, but the shared object needs to know what types to generate at the API boundary.

No special configuration for this library

ghc-hotswap

General library for loading and consecutively updating shared objects in a concurrency-safe manner.

No special configuration for this library

ghc-hotswap-so

Example shared object library. Constains:

The main purpose is to generate an object file that another binary will know how to dynamically open. The --enable-library-for-ghci cabal flag does this for us.

The file we care about gets placed in ghc-hotswap-so/dist/build/ with a filename prefix like HSghc-hotswap-so and extension .o. The path to this file is important (or copy it to a nicer location for yourself) as you'll need it later.

ghc-hotswap-demo

Demo executable for loading + unloading shared objects on the fly.

Note the configuration set in ghc-hotswap-demo.cabal. It does not depend on ghc-hotswap-so and adds -rdynamic and -fwhole-archive-hs-libs as GHC flags.

The program loads in the first shared object and periodically prints some information. It's waiting for input on stdin for the path of the next shared object to use.