- Cvs-hugs - Haskell.org

cvs commit: hugs98/src config.h.in connect.h hugs.c input.c iomonad.c machdep.c output.c prelude.h storage.c storage.h
by nordland＠glass.cse.ogi.edu 14 Feb '01

14 Feb '01

nordland 2001/02/14 04:15:05 PST Modified files: src config.h.in connect.h hugs.c input.c iomonad.c machdep.c output.c prelude.h storage.c storage.h Log: Added support for MacOS and CodeWarrior Pro 5. Revision Changes Path 1.4 +0 -5 hugs98/src/config.h.in 1.19 +3 -2 hugs98/src/connect.h 1.35 +94 -35 hugs98/src/hugs.c 1.23 +4 -4 hugs98/src/input.c 1.11 +16 -2 hugs98/src/iomonad.c 1.13 +125 -38 hugs98/src/machdep.c 1.16 +7 -3 hugs98/src/output.c 1.15 +20 -9 hugs98/src/prelude.h 1.14 +2 -3 hugs98/src/storage.c 1.16 +3 -3 hugs98/src/storage.h

1 0

cvs commit: hugs98/src/machugs MoreFilesExtras.c MoreFilesExtras.h Optimization.h OptimizationEnd.h config.h hugs.mcp.xml hugs.r options.h
by nordland＠glass.cse.ogi.edu 14 Feb '01

14 Feb '01

nordland 2001/02/14 04:08:58 PST Added files: src/machugs MoreFilesExtras.c MoreFilesExtras.h Optimization.h OptimizationEnd.h config.h hugs.mcp.xml hugs.r options.h Log: Added new CWPro support files.

1 0

cvs commit: hugs98/src/mac README.txt config.h launch.c options.h
by nordland＠glass.cse.ogi.edu 14 Feb '01

14 Feb '01

nordland 2001/02/14 04:06:55 PST Removed files: src/mac README.txt config.h launch.c options.h Log: Begun shifting MacOS support from Symantec to CWPro.

1 0

cvs commit: hugs98 hugs98.spec
by nordland＠glass.cse.ogi.edu 14 Feb '01

14 Feb '01

nordland 2001/02/14 04:00:54 PST Modified files: . hugs98.spec Log: Updated version number for Feb 2001 release. Revision Changes Path 1.7 +1 -1 hugs98/hugs98.spec

1 0

cvs commit: hugs98/src version.h
by nordland＠glass.cse.ogi.edu 14 Feb '01

14 Feb '01

nordland 2001/02/14 03:59:41 PST Modified files: src version.h Log: Updated version number for Feb 2001 release. Revision Changes Path 1.13 +2 -2 hugs98/src/version.h

1 0

cvs commit: hugs98 Install
by nordland＠glass.cse.ogi.edu 14 Feb '01

14 Feb '01

nordland 2001/02/14 03:56:10 PST Modified files: . Install Log: Added MacOS installation guidlines. Revision Changes Path 1.3 +11 -0 hugs98/Install

1 0

cvs commit: hugs98/docs observe-notes.txt
by rwatson＠glass.cse.ogi.edu 13 Feb '01

13 Feb '01

rwatson 2001/02/13 17:48:57 PST Modified files: docs observe-notes.txt Log: Update Hugs debugger release notes. Revision Changes Path 1.2 +91 -54 hugs98/docs/observe-notes.txt

1 0

cvs commit: hugs98/src hugs.c machine.c output.c connect.h
by rwatson＠glass.cse.ogi.edu 13 Feb '01

13 Feb '01

rwatson 2001/02/13 16:25:26 PST Modified files: src hugs.c machine.c output.c connect.h Log: Various Hugs debugger mods: Fixed bugs bue to ^C, error, undefined Added prettier printing of observed strings Optional disable of root optimisation (-R flag) Revision Changes Path 1.34 +13 -6 hugs98/src/hugs.c 1.6 +30 -4 hugs98/src/machine.c 1.15 +64 -10 hugs98/src/output.c 1.18 +4 -3 hugs98/src/connect.h

1 0

cvs commit: hugs98/src/winhugs winhugs.rc
by nordland＠glass.cse.ogi.edu 13 Feb '01

13 Feb '01

nordland 2001/02/13 11:16:22 PST Modified files: src/winhugs winhugs.rc Log: Some small mods by Pepe. Revision Changes Path 1.4 +8 -8 hugs98/src/winhugs/winhugs.rc

1 0

cvs commit: hugs98/docs winhugs-notes.txt ffi-notes.txt
by nordland＠glass.cse.ogi.edu 13 Feb '01

13 Feb '01

nordland 2001/02/13 11:12:36 PST Modified files: docs ffi-notes.txt Added files: docs winhugs-notes.txt Log: Added WinHugs release notes, and changed 'T' into 't' in ffi.c! Revision Changes Path 1.2 +1 -1 hugs98/docs/ffi-notes.txt

1 0

cvs commit: hugs98/src static.c
by nordland＠glass.cse.ogi.edu 12 Feb '01

12 Feb '01

nordland 2001/02/12 17:02:16 PST Modified files: src static.c Log: Fixed bug in the reporting of inconsistent instances due to functional dependencies. Revision Changes Path 1.30 +3 -3 hugs98/src/static.c

1 0

cvs commit: hugs98/docs ffi-notes.txt
by Alastair Reid 12 Feb '01

12 Feb '01

reid 2001/02/12 13:21:09 PST Added files: docs ffi-notes.txt Log: Added release notes for the ffi implementation.

1 0

cvs commit: hugs98/src MkInstal.in
by nordland＠glass.cse.ogi.edu 12 Feb '01

12 Feb '01

nordland 2001/02/12 12:25:02 PST Modified files: src MkInstal.in Log: Modified installation to create man/ and man1/ if necessary. Revision Changes Path 1.3 +2 -1 hugs98/src/MkInstal.in

1 0

cvs commit: hugs98/src ffi.c prelude.h
by nordland＠glass.cse.ogi.edu 12 Feb '01

12 Feb '01

nordland 2001/02/12 11:53:47 PST Modified files: src ffi.c prelude.h Log: Applied Sigbjorn's patch to make ffi output ANSI compliant. Turned up some default values in prelude.h. Made zip-comprehensions turned on by default. Revision Changes Path 1.2 +16 -11 hugs98/src/ffi.c 1.14 +11 -10 hugs98/src/prelude.h

1 0

cvs commit: hugs98/src/winhugs winhugs.c winhugs.rc
by nordland＠glass.cse.ogi.edu 12 Feb '01

12 Feb '01

nordland 2001/02/12 11:15:07 PST Modified files: src/winhugs winhugs.c winhugs.rc Log: Fixed some line breaking problems with the previous update. Revision Changes Path 1.3 +142 -150 hugs98/src/winhugs/winhugs.c 1.3 +7 -13 hugs98/src/winhugs/winhugs.rc

1 0

cvs commit: hugs98/lib/exts ST.hs
by nordland＠glass.cse.ogi.edu 10 Feb '01

10 Feb '01

nordland 2001/02/10 00:05:49 PST Modified files: lib/exts ST.hs Log: Reverting to old version. It seems like my "fix" for the runST type was premature and absolutely incorrect (blush)! Revision Changes Path 1.3 +1 -1 hugs98/lib/exts/ST.hs

1 0

cvs commit: hugs98/src hugs.c machdep.c output.c hugs98/src/winhugs winhugs.c winhugs.rc
by nordland＠glass.cse.ogi.edu 09 Feb '01

09 Feb '01

nordland 2001/02/09 17:20:47 PST Modified files: src hugs.c machdep.c output.c src/winhugs winhugs.c winhugs.rc Log: Applied Pepe's winhugs-related patches. Revision Changes Path 1.33 +18 -12 hugs98/src/hugs.c 1.12 +19 -7 hugs98/src/machdep.c 1.14 +20 -15 hugs98/src/output.c 1.2 +152 -139 hugs98/src/winhugs/winhugs.c 1.2 +56 -44 hugs98/src/winhugs/winhugs.rc

1 0

cvs commit: hugs98/src hugs.c
by nordland＠glass.cse.ogi.edu 09 Feb '01

09 Feb '01

nordland 2001/02/09 17:07:53 PST Modified files: src hugs.c Log: Applied Sigbjorn's editor-related patches. Revision Changes Path 1.32 +30 -4 hugs98/src/hugs.c

1 0

cvs commit: hugs98/lib/exts ST.hs
by nordland＠glass.cse.ogi.edu 09 Feb '01

09 Feb '01

nordland 2001/02/09 15:55:58 PST Modified files: lib/exts ST.hs Log: Fixed type of runST to use the correct 'forall' syntax. Revision Changes Path 1.2 +1 -1 hugs98/lib/exts/ST.hs

1 0

cvs commit: hugs98/src input.c
by Jeff Lewis 31 Jan '01

31 Jan '01

lewie 2001/01/31 16:03:33 PST Modified files: src input.c Log: Correct handling of backslash (or rather, lack thereof) in HERE docs. Revision Changes Path 1.22 +3 -3 hugs98/src/input.c

1 0

cvs commit: hugs98/docs zipcomp-notes.txt
by nordland＠glass.cse.ogi.edu 31 Jan '01

31 Jan '01

nordland 2001/01/31 13:59:30 PST Added files: docs zipcomp-notes.txt Log: Added release notes for the zip-comprehensions feature.

1 0

cvs commit: hugs98/src parser.y
by nordland＠glass.cse.ogi.edu 31 Jan '01

31 Jan '01

nordland 2001/01/31 13:27:23 PST Modified files: src parser.y Log: Changed the expected number of shift/reduce conflicts from 6 to 15. (Hey, Alastair, surely it must be possible to trim this down again! :-) Revision Changes Path 1.14 +3 -3 hugs98/src/parser.y

1 0

cvs commit: hugs98/src machdep.c
by nordland＠glass.cse.ogi.edu 31 Jan '01

31 Jan '01

nordland 2001/01/31 13:10:38 PST Modified files: src machdep.c Log: The last (?) Winhugs correction. Revision Changes Path 1.11 +4 -2 hugs98/src/machdep.c

1 0

cvs commit: hugs98 Readme
by nordland＠glass.cse.ogi.edu 31 Jan '01

31 Jan '01

nordland 2001/01/31 12:41:17 PST Modified files: . Readme Log: Added a tiny missing 's'! Revision Changes Path 1.10 +1 -1 hugs98/Readme

1 0

cvs commit: hugs98 Readme
by nordland＠glass.cse.ogi.edu 31 Jan '01

31 Jan '01

nordland 2001/01/31 12:05:44 PST Modified files: . Readme Log: Updated the greetings. Revision Changes Path 1.9 +22 -9 hugs98/Readme

1 0

New release
by Johan Nordlander 31 Jan '01

31 Jan '01

Dear Hugs authors, A new beta release of Hugs98 will be sent out within the next couple of hours. I'm writing to you to clarify what this beta status means. The group of people involved with the maintenance of the Hugs sources is now quite large, and if we also count the maintainers of all software packages that directly depend on Hugs, it's clear that the task of synchronizing all updating and testing that must preceed a new release is quite daunting. Therefore, by releasing a beta version today, I'm hoping to take a short-cut towards the goal of a stable February 2001 release, in the sense that everybody within the Hugs community will have a chance to react to the current changes. This means that there will still be time to polish the sources after today's release, so don't panic when you see the announcement. However, a beta release also means that we're actually freezing the list of features as it stands. That is, no more fancy additions will be considered for the February 2001 release. For purely nostalgic reasons, the target date for the final release is February 14. So please take the time to monitor this beta closely until then, and let the bug reports flow in to hugs-bugs(a)haskell.org. Or, preferably, make the necessary adjustments to the repository yourselves. All the best, Johan

1 0

cvs commit: hugs98/src/epoc hugs.mmp
by Reuben Thomas 31 Jan '01

31 Jan '01

rrt 2001/01/31 02:40:40 PST Modified files: src/epoc hugs.mmp Log: Update to cope with reorganisation of EPOC support files. Revision Changes Path 1.3 +1 -1 hugs98/src/epoc/hugs.mmp

1 0

cvs commit: hugs98/src hugs.c
by Jeff Lewis 31 Jan '01

31 Jan '01

lewie 2001/01/30 22:39:31 PST Modified files: src hugs.c Log: Patch from Thomas Nordin that reduces system call overhead during module loading. Revision Changes Path 1.31 +13 -4 hugs98/src/hugs.c

1 0

cvs commit: hugs98/src/resource button.bmp class.bmp classes.bmp commdlg1.bmp commdlg2.bmp commdlg3.bmp copybutt.bmp cutbutt.bmp datacons.bmp datatype.bmp delebutt.bmp disabled.bmp editbutt.bmp exitbutt.bmp gc.cur hand.cur helpbutt.bmp hierbutt.bmp hugs1.ico ...
by nordland＠glass.cse.ogi.edu 31 Jan '01

31 Jan '01

nordland 2001/01/30 21:40:59 PST Removed files: src/resource button.bmp class.bmp classes.bmp commdlg1.bmp commdlg2.bmp commdlg3.bmp copybutt.bmp cutbutt.bmp datacons.bmp datatype.bmp delebutt.bmp disabled.bmp editbutt.bmp exitbutt.bmp gc.cur hand.cur helpbutt.bmp hierbutt.bmp hugs1.ico hugs2.ico instance.bmp lambda.ico member.bmp move.cur name.bmp names.bmp newtype.bmp noassign.ico optsbutt.bmp pastbutt.bmp primitiv.bmp pushbutt.bmp relobutt.bmp runbutt.bmp selector.bmp smanbutt.bmp statusb.bmp statusl.bmp statusr.bmp stopbutt.bmp synonym.bmp tycons.bmp world.ico Log: Removed old Windows resources.

1 0

cvs commit: hugs98/src/win32 Makefile config.bat config.h config.sh iobjects.rsp options.h
by nordland＠glass.cse.ogi.edu 31 Jan '01

31 Jan '01

nordland 2001/01/30 21:39:44 PST Removed files: src/win32 Makefile config.bat config.h config.sh iobjects.rsp options.h Log: Removed old Windows resources.

1 0

cvs commit: hugs98 Install
by nordland＠glass.cse.ogi.edu 30 Jan '01

30 Jan '01

nordland 2001/01/30 18:56:55 PST Modified files: . Install Log: Updated installation document to reflect new Windows support. Revision Changes Path 1.2 +5 -5 hugs98/Install

1 0

cvs commit: hugs98/src Makefile.in builtin.c connect.h errors.h hugs.c input.c machdep.c machine.c prelude.h type.c epoc.c epoc.h epoc_input.c epoc_input.h hugs32.rc win-menu.h win-text.c win-text.h winhugs.c hugs98/src/bcc32 Makefile hugs98/src/djgpp2 ...
by nordland＠glass.cse.ogi.edu 30 Jan '01

30 Jan '01

nordland 2001/01/30 18:52:15 PST Modified files: src Makefile.in builtin.c connect.h errors.h hugs.c input.c machdep.c machine.c prelude.h type.c src/bcc32 Makefile src/djgpp2 Makefile src/epoc hugs.mmp src/msc Makefile config.h Added files: src/epoc epoc.c epoc.h epoc_input.c epoc_input.h src/winhugs Makefile WINFRAME.H WINSTLN.H WINTOOLB.H Winbrows.c Winframe.c Winhint.c Winhint.h Winhugs.h Winmenu.h Winstln.c Wintext.c Wintext.h Wintoolb.c Winutils.c Winutils.h config.bat config.h menusbm.c options.h resource.h winhugs.c winhugs.rc src/winhugs/register make.bat register.c src/winhugs/resource button.bmp classbmp.bmp classesd.bmp copybutt.bmp cutbutto.bmp datacons.bmp datatype.bmp deletebu.bmp disabled.bmp editbutt.bmp exitbutt.bmp gc.cur hand.cur helpbutt.bmp hierarch.bmp hierbutt.bmp hugs1.ico hugs2.ico hugs32bm.bmp hugsdoc.ico instance.bmp lambda.ico logo.bmp makebutt.bmp memberbm.bmp move.cur namebmp.bmp namesdlg.bmp newtypeb.bmp noassign.ico openfile.bmp openproj.bmp optionsb.bmp optionsd.bmp pastebut.bmp primbmp.bmp pushedbu.bmp relobutt.bmp resizeco.bmp runbutto.bmp selector.bmp smanbutt.bmp smand.bmp stopbutt.bmp synonym.bmp tyconsdl.bmp typecons.bmp typesinb.bmp world.ico Removed files: src epoc.c epoc.h epoc_input.c epoc_input.h hugs32.rc win-menu.h win-text.c win-text.h winhugs.c Log: Replaced the old Winhugs support with Pepe G's latest code. Ironed out some compiler warnings under Windows. Moved epoc support to its own directory. Updated all Makefiles (to the extent of my knowledge; epoc, bcc32, and djgpp2 versions are not tested). Revision Changes Path 1.7 +2 -3 hugs98/src/Makefile.in 1.10 +3 -2 hugs98/src/builtin.c 1.17 +7 -2 hugs98/src/connect.h 1.5 +8 -4 hugs98/src/errors.h 1.30 +202 -11 hugs98/src/hugs.c 1.21 +37 -2 hugs98/src/input.c 1.10 +38 -9 hugs98/src/machdep.c 1.5 +3 -6 hugs98/src/machine.c 1.13 +19 -6 hugs98/src/prelude.h 1.30 +17 -11 hugs98/src/type.c 1.3 +7 -6 hugs98/src/bcc32/Makefile 1.3 +11 -10 hugs98/src/djgpp2/Makefile 1.2 +1 -1 hugs98/src/epoc/hugs.mmp 1.3 +6 -6 hugs98/src/msc/Makefile 1.2 +1 -1 hugs98/src/msc/config.h

1 0

cvs commit: hugs98/lib Prelude.hs hugs98/lib/exts Channel.lhs
by nordland＠glass.cse.ogi.edu 30 Jan '01

30 Jan '01

nordland 2001/01/30 17:34:44 PST Modified files: lib Prelude.hs lib/exts Channel.lhs Log: Fixed the "dupChan" bug, and completed the defaults for the Enum class. Revision Changes Path 1.6 +2 -0 hugs98/lib/Prelude.hs 1.2 +1 -1 hugs98/lib/exts/Channel.lhs

1 0

cvs commit: hugs98/src static.c type.c
by Jeff Lewis 30 Jan '01

30 Jan '01

lewie 2001/01/30 07:05:12 PST Modified files: src static.c type.c Log: MDO patch. Revision Changes Path 1.29 +47 -35 hugs98/src/static.c 1.29 +11 -8 hugs98/src/type.c

1 0

cvs commit: hugs98/src static.c
by Jeff Lewis 18 Jan '01

18 Jan '01

lewie 2001/01/18 09:32:13 PST Modified files: src static.c Log: Removed deprecated comment. Also rename depCompy to a name more accurately reflecting its function (depZCompBranch). Revision Changes Path 1.28 +8 -9 hugs98/src/static.c

1 0

cvs commit: hugs98 hugs98.spec
by Jeff Lewis 18 Jan '01

18 Jan '01

lewie 2001/01/18 08:06:47 PST Modified files: . hugs98.spec Log: Updated release tag. Revision Changes Path 1.6 +2 -2 hugs98/hugs98.spec

1 0

cvs commit: hugs98 Makefile hugs98/docs Makefile.in hugs.1.in
by nordland＠glass.cse.ogi.edu 17 Jan '01

17 Jan '01

nordland 2001/01/17 15:45:18 PST Modified files: . Makefile Added files: docs Makefile.in hugs.1.in Log: More of Ross Paterson's documentation changes. Revision Changes Path 1.7 +4 -3 hugs98/Makefile

1 0

cvs commit: hugs98/docs Makefile hugs.1 hugs.man
by nordland＠glass.cse.ogi.edu 17 Jan '01

17 Jan '01

nordland 2001/01/17 15:43:57 PST Removed files: docs Makefile hugs.1 hugs.man Log: Removed documentation files that are now generated instead.

1 0

cvs commit: hugs98/docs mdo-notes.txt observe-notes.txt
by nordland＠glass.cse.ogi.edu 17 Jan '01

17 Jan '01

nordland 2001/01/17 15:41:17 PST Added files: docs mdo-notes.txt observe-notes.txt Log: Added release notes for the debugging and recursive monad extensions.

1 0

cvs commit: hugs98/src MkInstal.in hugs.c input.c prelude.h version.h hugs98/src/unix configure configure.in
by nordland＠glass.cse.ogi.edu 17 Jan '01

17 Jan '01

nordland 2001/01/17 15:30:36 PST Modified files: src MkInstal.in hugs.c input.c prelude.h version.h src/unix configure configure.in Log: Misc. cleanup, plus Ross Paterson's documentation installation updates. Revision Changes Path 1.2 +4 -0 hugs98/src/MkInstal.in 1.29 +10 -6 hugs98/src/hugs.c 1.20 +4 -2 hugs98/src/input.c 1.12 +6 -4 hugs98/src/prelude.h 1.12 +2 -2 hugs98/src/version.h 1.6 +13 -5 hugs98/src/unix/configure 1.6 +9 -5 hugs98/src/unix/configure.in

1 0

cvs commit: hugs98/lib/exts Observe.lhs Observe.hs
by nordland＠glass.cse.ogi.edu 17 Jan '01

17 Jan '01

nordland 2001/01/17 15:26:39 PST Added files: lib/exts Observe.lhs Removed files: lib/exts Observe.hs Log: Replaced Observe.hs with Observe.lhs in order to conform with Hood.

1 0

cvs commit: hugs98/lib/exts Observe.hs
by nordland＠glass.cse.ogi.edu 17 Jan '01

17 Jan '01

nordland 2001/01/17 09:44:23 PST Added files: lib/exts Observe.hs Log: Added missing debugging library.

1 0

cvs commit: hugs98/src builtin.c
by nordland＠glass.cse.ogi.edu 16 Jan '01

16 Jan '01

nordland 2001/01/16 10:48:40 PST Modified files: src builtin.c Log: Updated debugging code in builtin.c on behalf of Richard Watson. Revision Changes Path 1.9 +4 -12 hugs98/src/builtin.c

1 0

cvs commit: hugs98/src hugs.c
by nordland＠glass.cse.ogi.edu 08 Jan '01

08 Jan '01

nordland 2001/01/08 14:51:57 PST Modified files: src hugs.c Log: A slight adjustment... Revision Changes Path 1.28 +3 -2 hugs98/src/hugs.c

1 0

cvs commit: hugs98/lib/exts MonadRec.hs hugs98/src compiler.c connect.h input.c output.c parser.y prelude.h static.c storage.h type.c
by Jeff Lewis 08 Jan '01

08 Jan '01

lewie 2001/01/08 13:43:06 PST Modified files: src compiler.c connect.h input.c output.c parser.y prelude.h static.c storage.h type.c Added files: lib/exts MonadRec.hs Log: Added recursive monadic do notation extension. Revision Changes Path 1.4 +130 -2 hugs98/src/compiler.c 1.16 +7 -2 hugs98/src/connect.h 1.19 +13 -2 hugs98/src/input.c 1.13 +7 -2 hugs98/src/output.c 1.13 +51 -2 hugs98/src/parser.y 1.11 +4 -2 hugs98/src/prelude.h 1.27 +476 -3 hugs98/src/static.c 1.15 +7 -2 hugs98/src/storage.h 1.28 +186 -2 hugs98/src/type.c

1 0

cvs commit: hugs98 Makefile
by Jeff Lewis 02 Jan '01

02 Jan '01

lewie 2001/01/02 14:22:33 PST Modified files: . Makefile Log: Make `make rpm' more friendly to re-builds. Revision Changes Path 1.6 +1 -0 hugs98/Makefile

1 0

cvs commit: hugs98/src input.c parser.y
by Jeff Lewis 02 Jan '01

02 Jan '01

lewie 2001/01/02 14:17:14 PST Modified files: src input.c parser.y Log: Make `export', `dynamic', `ccall', `stdcall', `unsafe' and `label' be varids. Revision Changes Path 1.18 +22 -2 hugs98/src/input.c 1.12 +8 -2 hugs98/src/parser.y

1 0

cvs commit: hugs98/src builtin.c command.h connect.h errors.h hugs.c input.c interns.c machine.c output.c prelude.h printer.c storage.c storage.h
by nordland＠glass.cse.ogi.edu 02 Jan '01

02 Jan '01

nordland 2001/01/02 10:21:41 PST Modified files: src builtin.c command.h connect.h errors.h hugs.c input.c interns.c machine.c output.c prelude.h printer.c storage.c storage.h Log: Added Richard Watson's debugging extensions (flagged OBSERVATIONS). Revision Changes Path 1.8 +87 -3 hugs98/src/builtin.c 1.8 +12 -2 hugs98/src/command.h 1.15 +16 -2 hugs98/src/connect.h 1.4 +7 -2 hugs98/src/errors.h 1.27 +66 -2 hugs98/src/hugs.c 1.17 +7 -2 hugs98/src/input.c 1.4 +6 -3 hugs98/src/interns.c 1.4 +215 -3 hugs98/src/machine.c 1.12 +185 -7 hugs98/src/output.c 1.10 +14 -5 hugs98/src/prelude.h 1.4 +7 -2 hugs98/src/printer.c 1.13 +206 -3 hugs98/src/storage.c 1.14 +66 -3 hugs98/src/storage.h

1 0

RE: cvs commit: hugs98/src GreenCard.h connect.h hugs.c input.c p arser.y static.c
by Simon Marlow 14 Dec '00

14 Dec '00

> reid 2000/12/13 01:36:05 PST > > Modified files: > src GreenCard.h connect.h hugs.c input.c > parser.y static.c > Log: > Final commit in the series. Alastair - this is great stuff. Nice one. We should work together on getting the FFI libraries into Hugs too, and sync up as much as possible. BTW, we're using (Ptr a) instead of Addr these days. Cheers, Simon

1 0

cvs commit: hugs98/src GreenCard.h connect.h hugs.c input.c parser.y static.c
by Alastair Reid 13 Dec '00

13 Dec '00

reid 2000/12/13 01:36:05 PST Modified files: src GreenCard.h connect.h hugs.c input.c parser.y static.c Log: Final commit in the series. Added +G flag to options in hugs.c. Lexer, parser and static checker additions. Note that foreign export (static) is not implemented. My problem was how to handle the following: plus x y = x + y foreign export "plusInt" plus :: Int -> Int -> Int foreign export "plusFloat" plus :: Float -> Float -> Float What I want to do is to define: __plusInt :: Int -> Int -> Int __plusInt = plus __plusFloat :: Float -> Float -> Float __plusFloat = plus then invoke the typechecker which will insert dictionaries, check that the instances make sense, etc. And now I can foreign export each individual instance with no bother at all. One problem is that ffi declarations are processed fairly early in the checking process - it's a bad time to go invoking the typechecker. Another problem is that I'm not entirely sure how to actually do the above. I think it should be like checking the bindings in an instance declaration but I don't quite grok that code. [This is a subtly disguised plea for help from Mark, Jeff or someone else who feels happy in the typechecker. (I'm assuming someone suitably qualified is on the commit mailing list.)] Anyway, enough about what if can't do. Here's what it can do: 1) Copy the following files into Test.hs and test.c 2) hugs +G Test.hs This generates Test.c 3) cc -shared Test.c test.c -o Test.so This generates Test.so 4) hugs Test.hs This loads Test.hs and Test.so 5) test (+) 1 1 This should print 2! I know it's a lot of work just to add two numbers... but there's a certain satisfaction in knowing that the addition was done in C isn't there? ---------------------------------------------------------------- -- Start of Haskell part of test file Test.hs ---------------------------------------------------------------- -- Doesn't support: -- o foreign export static -- o Int64, Word64, Int32, Word32, Int16, Word16, Int8, Word8 -- o The named C types HsChar, HsInt16, etc module Test where foreign import x :: Int -> Char -> IO Addr foreign import z :: Int -> Int -> Int foreign import dynamic x' :: Addr -> (Int -> Char -> IO Addr) -- foreign export static isn't implemented (typechecking problems) -- foreign export y :: Int -> Char -> IO Float -- y _ _ = return 1.0 foreign export dynamic toC :: (Int -> Int -> Int) -> IO Addr -- You can use either of these definitions - both work -- foreign import "fromC" fromC :: Addr -> (Int -> Int -> Int) fromC = fromfromC fromC_addr foreign import dynamic fromfromC :: Addr -> (Addr -> (Int -> Int -> Int)) foreign label "fromC" fromC_addr :: Addr test f x y = do{ f' <- toC f; print (fromC f' x y) } ---------------------------------------------------------------- -- Start of Haskell part of test file Test.hs ---------------------------------------------------------------- /**************************************************************** * Start of C part of test file test.c ****************************************************************/ extern void* y(int a, char b); void* x(int a, char b) { // return y(a,b); } int z(int a, int b) { return a+b; } void* from_dyn(void* (*f)(int i, char c),int i, char c) { return (*f)(i,c); } void* fromC(void* (*f)(int a, int b),int a, int b) { return (*f)(a,b); } /**************************************************************** * Start of C part of test file test.c ****************************************************************/ Revision Changes Path 1.4 +12 -5 hugs98/src/GreenCard.h 1.14 +9 -2 hugs98/src/connect.h 1.26 +8 -3 hugs98/src/hugs.c 1.16 +29 -2 hugs98/src/input.c 1.11 +44 -4 hugs98/src/parser.y 1.26 +357 -2 hugs98/src/static.c

1 0