Haskell for Plan 9

News:I've just discovered that hugs works fine with acme (:e command) -- just start hugs with the -Eacme option. It probably would work fine with sam too.
I have also modified hugs to install the libraries and binaries in $home/lib/hugs and $home/bin/$objtype respectively. Do a make install and you'll get a hugs installation that works everywhere. To play with haskell demoes go to $home/lib/hugs/demos.
This is a Plan 9 port of the Haskell functional language interpreter Hugs. More information about the language Haskell (including hugs documentation and haskell tutorials) could be found here.

This port does not appear to lack any functionality from the original hugs interpreter. Only the readlib library does not exist and you'll have to use the normal plan9 mouse-driven copy/paste to edit while in Hugs.

Plan9-related files are located in src/Plan9 and consist of: Makefile, config.h and options.h.. Those files have conveniently been copied for you in the src/ directory so the only thing that you need to do is to type 'make'.

The port is non-desctructive in the sense that I've worked around the Hugs source. The only major changes are:
  • #ifdef-ed around a few function definitions in machdep.c which the compiler didn't like
  • #ifdef-ed around a 'getch()' call in machdep.c -- doesn't exist in plan9
  • removed a few //-style comments that made no sense anyway :)

    Drawbacks: Hugs is currently not configured to use an editor (:e will not work). I can change that in the future if anyone is interested. Hugs also has no "make install" and currently runs only from the directory it was compiled in. To change this behaviour you can start hugs with -P/something/lib where 'something' is where you put the standard prelude libraries. This could also be changed if enough people are interested.
    Oh, I just realized that the version string is not printed on startup.. Well, it's November 2002 for those who care :)

    Download: here

    Compile: Should be as simple as:
        % gunzip < hugs-p9.tgz | tar xv # no lnfs required -- it's safe there
        % cd hugs-p9/src
        % ape/psh
        $ make
    cpu% cd hugs-p9
    cpu% cd src
    cpu% ape/psh
    $ make
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  hugs.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  storage.c
    cpp: storage.c:2757 Unknown preprocessor control warning
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  input.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\" static.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  type.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  subst.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\" compiler.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  plugin.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  builtin.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  machine.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  output.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  ffi.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  version.c
    cc  -o hugs hugs.o storage.o input.o static.o type.o subst.o compiler.o  plugin.o builtin.o machine.o output.o ffi.o version.o 
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  runhugs.c
    cc -c -g -O -DHUGSDIR=\"/usr/andrey/lib/hugs\"  server.c
    cc  -o runhugs runhugs.o server.o storage.o input.o static.o type.o subst.o compiler.o  plugin.o builtin.o machine.o output.o ffi.o version.o   
    $ make install
    test -d /usr/andrey/lib/hugs || mkdir /usr/andrey/lib/hugs
    test -d /usr/andrey/lib/hugs/lib || mkdir /usr/andrey/lib/hugs/lib
    test -d /usr/andrey/lib/hugs/demos || mkdir /usr/andrey/lib/hugs/demos
    test -d /usr/andrey/lib/hugs/demos/prolog || mkdir /usr/andrey/lib/hugs/demos/prolog
    test -d /usr/andrey/lib/hugs/lib/hugs || mkdir /usr/andrey/lib/hugs/lib/hugs
    test -d /usr/andrey/lib/hugs/lib/exts || mkdir /usr/andrey/lib/hugs/lib/exts
    cp ../lib/[A-Z]* /usr/andrey/lib/hugs/lib
    cp ../lib/hugs/* /usr/andrey/lib/hugs/lib/hugs/
    cp ../lib/exts/* /usr/andrey/lib/hugs/lib/exts/
    cp ../demos/prolog/* /usr/andrey/lib/hugs/demos/prolog/
    cp ../demos/[A-Z]* /usr/andrey/lib/hugs/demos/
    cp hugs /usr/andrey/bin/386/
    cp runhugs /usr/andrey/bin/386/
    __   __ __  __  ____   ___      _________________________________________
    ||   || ||  || ||  || ||__      Hugs 98: Based on the Haskell 98 standard
    ||___|| ||__|| ||__||  __||     Copyright (c) 1994-2002
    ||---||         ___||           World Wide Web: http://haskell.org/hugs
    ||   ||                         Report bugs to: hugs-bugs@haskell.org
    ||   || Version:      _________________________________________
    Haskell 98 mode: Restart with command line option -98 to enable extensions
    Reading file "../lib/Prelude.hs":
    Hugs session for:
    Type :? for help
    Prelude> [1..10]
    Prelude> map (*3) [1..10]
    Prelude> foldr1 (*) [1..100]
    Prelude> [Leaving Hugs]

    Last Modified: Apr 21 2003
    mirtchovski at gmail