October 2006 - Cvs-nhc98

patch applied (hat): Reformat to 80 columns only.
by Malcolm Wallace 10 Oct '06

10 Oct '06

Wed May 22 05:21:50 PDT 2002 malcolm * Reformat to 80 columns only. M ./src/compiler98/Case.hs -59 +69

1 0

patch applied (hat): Do `extractExp' on field update expressions, to ensure that local
by Malcolm Wallace 10 Oct '06

10 Oct '06

Tue May 21 04:08:22 PDT 2002 malcolm * Do `extractExp' on field update expressions, to ensure that local let-expressions get their arity recorded. This avoids a compiler failure later on. Test case that previously broke the compiler: module Apa where data A = A{ field :: Bool } apa = A{ field = let s = False in s } M ./src/compiler98/Extract.hs -1 +6

1 0

patch applied (hat): Bugfix for negative literal number patterns, where the instance of
by Malcolm Wallace 10 Oct '06

10 Oct '06

Mon May 20 10:51:35 PDT 2002 malcolm * Bugfix for negative literal number patterns, where the instance of Num to be used is at a user-defined type. Must ensure that the Num dictionary is passed through to the pattern-compilation phase (for selection of Eq.==), rather than selecting the negate method from it here and immediately discarding the dict. M ./src/compiler98/FixSyntax.hs -1 +7

1 0

patch applied (hat): In hat-trans, if a module has no export list, produce an export list
by Malcolm Wallace 10 Oct '06

10 Oct '06

Mon May 20 07:16:17 PDT 2002 malcolm * In hat-trans, if a module has no export list, produce an export list containing only the stuff that should be exported. This avoids the problem of overlapping definitions of internally-generated identifiers (e.g. source positions) in a multi-module program. A little bit of a hack but should work. (Also noticed that a default declaration should always be deleted by the transformation). M ./src/compiler98/TraceTrans.hs -19 +37 M ./src/hattrans/TraceTrans.hs -19 +37

1 0

patch applied (hat): With recent fixes for when Hidden/Forward chains are generated,
by Malcolm Wallace 10 Oct '06

10 Oct '06

Fri May 17 07:28:55 PDT 2002 malcolm * With recent fixes for when Hidden/Forward chains are generated, getResult() could fall into an infinite loop caused by a cycle in the result chain. The fix is to remember the most recent Hidden node encountered, and if we trip over it again, stop the cycle and return the Hidden. M ./src/hattools/artutils.c -8 +25 M ./src/hattools/artutils.h +1

1 0

patch applied (hat): Explicit projections in the SExp structure are a nuisance, so don' t
by Malcolm Wallace 10 Oct '06

10 Oct '06

Fri May 17 07:25:36 PDT 2002 malcolm * Explicit projections in the SExp structure are a nuisance, so don't generate them any more. M ./src/hattools/SExp.hs -4 +7

1 0

patch applied (hat): Propagate additional SExp constructor SString into dependent modules.
by Malcolm Wallace 10 Oct '06

10 Oct '06

Fri May 17 07:23:58 PDT 2002 malcolm * Propagate additional SExp constructor SString into dependent modules. M ./src/hattools/Pattern.hs +6 M ./src/hattools/TExp.hs +2

1 0

patch applied (hat): hat-observe of `f in f' (i.e. only recursive calls) gave no results.
by Malcolm Wallace 10 Oct '06

10 Oct '06

Fri May 17 03:32:32 PDT 2002 malcolm * hat-observe of `f in f' (i.e. only recursive calls) gave no results. M ./src/hattools/observeutils.c -1 +3

1 0

patch applied (hat): When navigating with arrow keys in hat-trail, treat a sugared character
by Malcolm Wallace 10 Oct '06

10 Oct '06

Fri May 17 03:30:33 PDT 2002 malcolm * When navigating with arrow keys in hat-trail, treat a sugared character string as a single unit, rather than moving the selection inside the string. Also, ensure that a sugared list (e.g. [a,b]) always has a terminating square bracket, even when the list is cut off at the standard depth. M ./src/hattools/SExp.hs -52 +41

1 0

patch applied (hat): In hat-trail, on the RHS of an equation, do not stop at the first
by Malcolm Wallace 10 Oct '06

10 Oct '06

Fri May 17 03:26:56 PDT 2002 malcolm * In hat-trail, on the RHS of an equation, do not stop at the first Hidden node if one is encountered, but continue searching. M ./src/hattools/HatTrail.hs -4 +4

1 0