peterjoel

use std::cell::RefCell;

trait UpdateMut<T:?Sized>  {
    fn update_mut <F> (&self, f: F) where F: Fn(&mut T);
}

trait Update<T>  {
    fn update <F> (&self, f: F) where F: Fn(&T) -> T;
}

peterjoel

#!/usr/bin/env runghc

module Main where

{-
    Uninstall.hs - a Haskell uninstaller for Mac OS X
    
    This program is really far too big to be in a single file. However, I
    wanted it to be easily distributable and runnable, and so have kept it all
    together.