sof 2003/12/18 19:10:46 PST Modified files: src static.c Log: extractBindings(): when shifting type annotations from LHS of a patbind to RHS take care of floating the type past the source location in the (location,expr) that is the RHS. This, I believe, fixes the "findBtyvsInt" internal error reported in http://haskell.org/pipermail/hugs-bugs/2003-November/001402.html (The example code therein does show up a difference in behaviour between the Hugs and GHC TCs, but that's a separate matter.) Revision Changes Path 1.163 +8 -3 hugs98/src/static.c