- Glasgow-haskell-users

ANN: regex-base version 0.72
by Chris Kuklewicz 17 Mar '07

17 Mar '07

The version 0.71 of regex-base supplied with GHC 6.6 has a bug in Text.Regex.Base.Context: > instance (RegexLike a b) => RegexContext a b (MatchResult b) where that essentially uses 'tail' where it should not, and this may even be using tail on an empty list. This has been patched in the just announced unstable version of regex-base 0.83 and this message announces that the stable repository at http://darcs.haskell.org/packages/regex-base/ now has version 0.72 which is just 0.71 with this bug fixed. For the eventual GHC 6.6.1 release, the supplied version of regex-base should either be conservatively updated to 0.72 or updated to the slightly more convenient regex-unstable/regex-base version (currently 0.83). Cheer, Chris Kuklewicz

2 1

Re: Installing GHC on sidux/debian
by Daniel Fischer 16 Mar '07

16 Mar '07

> Hi Daniel. > I haven't used rpm based systems very much. So this might not help you > .. > Unfortunately not. If sidux were rpm-based, I might not have these problems. On my SuSE at home I'm a happy ghc-user. Now, I'm visiting my brother, he's a bleeding-edge junkie and his most recent bleeding edge is sidux (branched off kanotix with the express aim to be extra edgy). Since I'll stay for more than a weekend, I want my Haskell here, too. I "apt-get install"ed ghc, got no errors, but can't run it, because sidux has no libreadline.so.4, which ghc needs. So I tried to install a libreadline.so.4, first via the compatibility package linked from the ghc-page. No success, complained about unfulfilled dependencies like ldconfig, though all mentioned dependencies ARE installed here (at least, locate finds them). Tried apt-get install libreadline4, couldn't find a candidate for installation (probably too old :-(, I'm half astonished that sidux is not past libreadline.so.5). So, any debian-users out there, how did you get libreadline.so.4 installed? Maybe that would work for sidux, too. > Try using ldd on you ghc binary to see all dll dependencies. ldd says: not a dynamic executable > Perhaps this gives you some info why the libraries aren't found. > > In general you can try using tools like www.rmpseek.com to find missing > packages. Found plenty, but: Just can't find one which I can install here... > If libraries aren't found running ldconfig might help. This recreates > all symlinks. > > But perhaps the most easiest way is trying to make your sidux box using > debian package repositories (don't know wether this messes up your > system) as I think the ghc rpm package was compiled and tested with > them. > > You might also try installig ghc from source (you need another ghc > binary install first to bootstrap) You can find documentation about how > to install from source on the ghc site. No ghc here, yet, once I have, I WILL build from source. > > If really everythig else fails you can also create a new environment > containing another os (such as debian) eg by using user mode linux. > (Then you need some more disk space) Maybe I can persuade my brother to get a decent linux installation, like SuSE or RedHat, where you can just install rpm's and be done. > > Do you have any recent ghc running? > > Good luck > Marc > Thanks, Daniel __________________________________________________________________________ Erweitern Sie FreeMail zu einem noch leistungsstärkeren E-Mail-Postfach! Mehr Infos unter http://freemail.web.de/home/landingpad/?mc=021131

2 1

Installing GHC
by Daniel Fischer 16 Mar '07

16 Mar '07

Hi, I'm trying to install a ghc on a sidux box (something akin to debian, I believe). apt-get install seemed to work, but running ghc results in: /usr/local/lib/ghc-6.6/ghc-6.6: error while loading shared libraries: libreadline.so.4: cannot open shared object file: No such file or directory So I'm trying to get libreadline.so.4. The compatibility RPM doesn't help, kpackage complains about missing /sbin/ldconfig, libncurses.so.5, libc.so.6 althouh all are present. apt-get install libreadline4 results in Paket libreadline4 ist nicht verfügbar, wird aber von einem anderen Paket referenziert. Das kann heißen, dass das Paket fehlt, dass es veraltet ist oder nur aus einer anderen Quelle verfügbar ist. Doch die folgenden Pakete ersetzen es: readline-common E: Paket libreadline4 hat keinen Installationskandidaten What should I try next? Thanks, Daniel _____________________________________________________________________ Der WEB.DE SmartSurfer hilft bis zu 70% Ihrer Onlinekosten zu sparen! http://smartsurfer.web.de/?mc=100071&distributionid=000000000066

4 3

FreeBSD/amd64 port: more progress
by Gregory Wright 16 Mar '07

16 Mar '07

Hi Ian, I'm building ghc-6.6.20070314 using the unregisterized ghc-6.4.2. (BTW, the unregisterized 6.4.2 seems quite reliable. I was able to build happy-1.15 and alex-2.0.1 without any problem.) I configured 6.6.20070314 for debugging by putting GhcUnregisterised=YES GhcWithNativeCodeGen=NO GhcWithInterpreter=NO SplitObjs=NO GhcWithSMP=NO SRC_HC_OPTS+=-debug -L/usr/local/lib GhcRTSWays=debug GhcRtsHcOpts+=-optc-DDEBUG GhcRtsCcOpts+=-optc-g EXTRA_LD_OPTS=-L/usr/local/lib -lbfd -liberty in mk/build.mk. With debugging turned on, the new 6.6 no longer hangs when compiling rts/Linker.c, rather the new 6.6 ghc-inplace fails compiling the first file it tries, Adjustor.c. I was running "top -u" in another window and when the build failed the memory used went unprintably high (i.e., "top" couldn't print it, nor could you print what I said when I noticed this). I was able to re-run the failed compilation under gdb. I added "-v" to ghc's command line. The big slowdown seemed to occur while ghc-inplace was generating the command line for the c compiler. This is when I interrupted it. From gdb: (gdb) run -B/tmp/ghc -optc-O -optc-Wall -optc-W -optc-Wstrict- prototypes -optc-Wmissing-prototypes -optc-Wmissing-declarations - optc-Winline -optc-Waggregate-return -optc-Wbad-function-cast -optc- I../includes -optc-I. -optc-Iparallel -optc-DCOMPILING_RTS -optc- fomit-frame-pointer -optc-optc-g -optc-DNOSMP -optc-I/usr/local/ include -optc-fno-strict-aliasing -H16m -O -debug -L/usr/local/lib - optc-O2 -optc-DDEBUG -optc-DNOSMP -static -I/usr/local/include -I. - #include HCIncludes.h -fvia-C -dcmm-lint -v -c Adjustor.c -o Adjustor.o Starting program: /tmp/ghc/compiler/stage1/ghc-6.6.20070314 -B/tmp/ ghc -optc-O -optc-Wall -optc-W -optc-Wstrict-prototypes -optc- Wmissing-prototypes -optc-Wmissing-declarations -optc-Winline -optc- Waggregate-return -optc-Wbad-function-cast -optc-I../includes -optc- I. -optc-Iparallel -optc-DCOMPILING_RTS -optc-fomit-frame-pointer - optc-optc-g -optc-DNOSMP -optc-I/usr/local/include -optc-fno-strict- aliasing -H16m -O -debug -L/usr/local/lib -optc-O2 -optc-DDEBUG -optc- DNOSMP -static -I/usr/local/include -I. -#include HCIncludes.h -fvia- C -dcmm-lint -v -c Adjustor.c -o Adjustor.o Glasgow Haskell Compiler, Version 6.6.20070314, for Haskell 98, compiled by GHC version 6.4.2 Using package config file: /tmp/ghc/driver/package.conf.inplace wired-in package base not found. wired-in package rts mapped to rts-1.0 wired-in package haskell98 not found. wired-in package template-haskell not found. Hsc static flags: -funregisterised -static -static Created temporary directory: /tmp/ghc27577_0 *** C Compiler: gcc -x c Adjustor.c -o /tmp/ghc27577_0/ghc27577_0.s -v -S -Wimplicit - O -D__GLASGOW_HASKELL__=606 -DNO_REGS -DUSE_MINIINTERPRETER -O -Wall - W -Wstrict-prototypes -Wmissing-prototypes -Wmissing-declarations - Winline -Waggregate-return -Wbad-function-cast -I../includes -I. - Iparallel -DCOMPILING_RTS -fomit-frame-pointer -optc-g -DNOSMP -I/usr/ local/include -fno-strict-aliasing -O2 -DDEBUG -DNOSMP -I /usr/local/ include -I . -I /tmp/ghc/includes -fwrapv Using built-in specs. Configured with: FreeBSD/amd64 system compiler Thread model: posix gcc version 3.4.6 [FreeBSD] 20060305 /usr/libexec/cc1 -quiet -v -I../includes -I. -^C Program received signal SIGINT, Interrupt. 0x00000000015b56f3 in findMBlockMap (p=0x3a242700000) at MBlock.c:68 68 for( i = 0; i < mblock_map_count; i++ ) (gdb) bt #0 0x00000000015b56f3 in findMBlockMap (p=0x3a242700000) at MBlock.c:68 #1 0x00000000015b574b in markHeapAlloced (p=0x3a242700000) at MBlock.c:98 #2 0x00000000015b59df in getMBlocks (n=262145) at MBlock.c:280 #3 0x00000000015ac617 in allocMegaGroup (n=262145) at BlockAlloc.c:174 #4 0x00000000015ac3e0 in allocGroup (n=67108865) at BlockAlloc.c:72 #5 0x000000000159e24a in allocate (n=34359738372) at Storage.c:504 #6 0x000000000159e439 in allocatePinned (n=34359738372) at Storage.c: 593 #7 0x00000000015a1376 in newPinnedByteArrayzh_fast () #8 0x000000000159d3e2 in StgRun (f=0x15a1330 <newPinnedByteArrayzh_fast>, basereg=0x3a2) at StgCRun.c:93 #9 0x00000000015990f3 in schedule (mainThread=0x2164080, initialCapability=0x3a2) at Schedule.c:932 #10 0x0000000001599edd in waitThread_ (m=0x2164080, initialCapability=0x0) at Schedule.c:2156 #11 0x0000000001599dd3 in scheduleWaitThread (tso=0x801dc0000, ret=0x0, initialCapability=0x0) at Schedule.c:2050 #12 0x00000000015959b1 in rts_evalLazyIO (p=0x1931270, ret=0x0) at RtsAPI.c:459 #13 0x000000000159521f in main (argc=1114636288, argv=0x3a2) at Main.c:104 (gdb) f 0 #0 0x00000000015b56f3 in findMBlockMap (p=0x3a242700000) at MBlock.c:68 68 for( i = 0; i < mblock_map_count; i++ ) Looks like someone is asking for too much memory (n=34359738372)! I've taken a cursory look at this, but I wanted to send a note in case you know what is wrong off the top of your head. I'll be away next week so I won't be able to easily test things on my amd64 box. I will be able to look at code, if you can point me to the right places. (Should I be looking at 6.4.2/6.6 differences in Storage.c or Schedule.c?) Best Wishes, Greg

2 4

scripts on unix
by Frederik Eaton 15 Mar '07

15 Mar '07

Hello, What is the proper technique for creating a Haskell script on a Unix system? e.g. with Perl I do #!/usr/bin/env perl print "hello world\n"; or #!/usr/bin/perl print "hello world\n"; I tried $ cat test #!/usr/bin/env runhaskell module Main where main = do putStrLn "hello world" But that doesn't work: $ ./test Warning: ignoring unrecognised input `./test' <interactive>:1:73: Failed to load interface for `Main': Use -v to see a list of the files searched for. When I use "runghc" I get the same error. If I change the first line to "-x hs" then the error is: ghc-6.6: unrecognised flags: -x hs Usage: For basic information, try the `--help' option. because the #! mechanism only allows a single argument. Thoughts? Thanks, Frederik -- http://ofb.net/~frederik/

8 13

Feature proposal: ghc --full-flag-help ?
by Marc Weber 15 Mar '07

15 Mar '07

Hi I did notice a lot of times that I just didn't remember the name of option X. How to look it up? Walk through html or pdf documentation? This forces me launching either firefox, entering shortcut odocghc (pointing to ghc help) ... HTML help ... flag reference .. which subtopic to look at? Lets try ... What about integrating a complete list into ghc which can accessed by ghc --full-flag-help | less ? If its too much effort to mantain both do you think one could be generated out of the other? Sure I can fake it and get that list out of the html documentation. I just want to know if someone else would like this flag, too Marc

5 6

hasktags - small patch
by Marc Weber 14 Mar '07

14 Mar '07

While starting to learn more about webfunctions I have noticed that hasktags doesn't recognize rwUserName and rwPasswd in the following code: data LogInController = LogInController {rLoggedIn::R Bool, rwUserName::RWE String, rwPasswd::RWE String} When using spaces it does LogInController {rLoggedIn :: R Bool, rwUserName :: RWE String, rwPasswd :: RWE String} This small patch introduces a now mywords function which recognizes a::b as words a,::,b which is what we need here (?) It does work in the above example. Here is the diff. Is it worth applying? 154c154 < let wordlines = map words aslines --- > let wordlines = map mywords aslines 161a162,174 > -- my words is mainly copied from Data.List. > -- difference abc::def is split into three words instead of one. > mywords :: String -> [String] > mywords (':':':':xs) = "::" : mywords xs > mywords s = case dropWhile {-partain:Char.-}isSpace s of > "" -> [] > s' -> w : mywords s'' > where (w, s'') = myBreak s' > myBreak [] = ([],[]) > myBreak (':':':':xs) = ([], "::"++xs) > myBreak (' ':xs) = ([],xs); > myBreak (x:xs) = let (a,b) = myBreak xs > in (x:a,b) Marc Weber

6 8

Still trying to build unregisterised for FreeBSD/amd64
by Gregory Wright 14 Mar '07

14 Mar '07

Hi, I have made some progress in compiling ghc-6.6 unregisterised for freebsd/amd64, but I am stuck again. To get the build on the host (freebsd/i386) to go through, I had to fix up Linker.c so that it would build. (Linker.c seems to define at least one utility function required by the rts, markRootPtrTable.) The instruction on the wiki to, "Don't worry if the build falls over in the RTS, we don't need the RTS yet," seems incorrect for ghc-6.6 at least. If the build fails in the rts, trying to proceed further just leads to more errors. I fixed up Linker.c by replacing the calls to mmap (which will need fixing up anyway on FreeBSD/amd64) with MAP_FAILED and copying the definitions of four relocation types for X86_64 from machine/elf.h on the target into do_Elf_Rela_relocations. (The build on the host complained that R_X86_64_64, R_X86_64_PC32, R_X86_64_32 and R_X86_64_32S were undefined.) With this change, the build on the host was able to complete. Collecting the .hc files works too, but the Makefile is out of date and references a few files that no longer exist. With a little hand editing, this is fixed and I have what I believe is a good set of .hc files. Over on the target, I unpack the fresh ghc-6.6-src.tar.bz2 and drop the .hc files on top of it. On FreeBSD, gmp is usually installed by the ports system in / usr/local/lib, so I preface invocations of configure in distrib/hc-build by CFLAGS="-I/usr/local/include" LDFLAGS="-L/usr/local/lib" so that the installed gmp is picked up in the configuration. I also edit mk/bootstrap.mk to add -L/usr/local/lib to HC_LD_BOOT_OPTS, and also add -lHSregex-compat -lHSregex-posix -lHSregex-base to HC_BOOT_LIBS. The directories to find the regex libraries also get added to HC_BOOT_LD_OPTS (-L$(FPTOOLS_TOP_ABS)/libraries/regex-*). I also have to delete cabal-setup from the SUBDIRS in libraries/Cabal/ Makefile. Otherwise the build fails complaining that there is no rule to make Cabal-setup.o. I also have to change libraries/base/Makefile to not try to build Prim.hs. It seems that when booting from .hc files, PrimopWrappers.hs does not in fact depend on Prim.hs; instead, PrimopWrappers.hs is not really used since we have PrimopWrappers.hc copied over from the host. (Without this change the Makefile tries to invoke the yet unbuilt genprimopcode program to build Prim.hs.) With these changes, distrib/hc-build is ready to roll. It chugs along happily until it tries to build Linker.c (which I have copied over from the host, so it has the changes that I made there) and then ghc-inplace segfaults: ../compiler/ghc-inplace -optc-O -optc-Wall -optc-W -optc-Wstrict- prototypes -optc-Wmissing-prototypes -optc-Wmissing-declarations - optc-Winline -optc-Waggregate-return -optc-Wbad-function-cast -optc- I../includes -optc-I. -optc-Iparallel -optc-DCOMPILING_RTS -optc- fomit-frame-pointer -optc-fno-strict-aliasing -H16m -O -optc-O2 - static -I. -#include HCIncludes.h -fvia-C -dcmm-lint -c Linker.c - o Linker.o Segmentation fault (core dumped) gmake: *** [Linker.o] Error 139 gmake: Leaving directory `/tmp/ghc-6.6/rts' I noticed that a year and a half ago when Wilhelm Kloke was porting ghc-6.4.1 to freebsd/amd64 he remarked that Linker.c had to be deleted. If I delete it from the target, the build just fails earlier, when genapply is being built, because of missing symbols: ------------------------------------------------------------------------ == gmake all -wr; in /tmp/ghc-6.6/utils/genapply ------------------------------------------------------------------------ gcc -x c GenApply.hc -o GenApply.o -c -O -fomit-frame-pointer -fno- asynchronous-unwind-tables -fno-unit-at-a-time -fno-builtin -DNO_REGS -DUSE_MINIINTERPRETER -D__GLASGOW_HASKELL__=606 -O -I/tmp/ghc-6.6/ includes -I/tmp/ghc-6.6/libraries/base/include -I/tmp/ghc-6.6/ libraries/unix/include -I/tmp/ghc-6.6/libraries/parsec/include -I/ tmp/ghc-6.6/libraries/readline/include -I. `echo | sed 's/^$/- DSTOLEN_X86_REGS=4/'` gcc -o genapply -fomit-frame-pointer -fno-asynchronous-unwind-tables -fno-unit-at-a-time -fno-builtin -DNO_REGS -DUSE_MINIINTERPRETER - D__GLASGOW_HASKELL__=606 -O -I/tmp/ghc-6.6/includes -I/tmp/ghc-6.6/ libraries/base/include -I/tmp/ghc-6.6/libraries/unix/include -I/tmp/ ghc-6.6/libraries/parsec/include -I/tmp/ghc-6.6/libraries/readline/ include -L/tmp/ghc-6.6/rts -L/tmp/ghc-6.6/libraries/base -L/tmp/ ghc-6.6/libraries/base/cbits -L/tmp/ghc-6.6/libraries/haskell98 -L/ tmp/ghc-6.6/libraries/parsec -L/tmp/ghc-6.6/libraries/regex-base -L/ tmp/ghc-6.6/libraries/regex-compat -L/tmp/ghc-6.6/libraries/regex- posix -L/tmp/ghc-6.6/libraries/Cabal -L/usr/local/lib -L/tmp/ghc-6.6/ libraries/template-haskell -L/tmp/ghc-6.6/libraries/readline -L/tmp/ ghc-6.6/libraries/unix -L/tmp/ghc-6.6/libraries/unix/cbits -u "GHCziBase_Izh_static_info" -u "GHCziBase_Czh_static_info" -u "GHCziFloat_Fzh_static_info" -u "GHCziFloat_Dzh_static_info" -u "GHCziPtr_Ptr_static_info" -u "GHCziWord_Wzh_static_info" -u "GHCziInt_I8zh_static_info" -u "GHCziInt_I16zh_static_info" -u "GHCziInt_I32zh_static_info" -u "GHCziInt_I64zh_static_info" -u "GHCziWord_W8zh_static_info" -u "GHCziWord_W16zh_static_info" -u "GHCziWord_W32zh_static_info" -u "GHCziWord_W64zh_static_info" -u "GHCziStable_StablePtr_static_info" -u "GHCziBase_Izh_con_info" -u "GHCziBase_Czh_con_info" -u "GHCziFloat_Fzh_con_info" -u "GHCziFloat_Dzh_con_info" -u "GHCziPtr_Ptr_con_info" -u "GHCziStable_StablePtr_con_info" -u "GHCziBase_False_closure" -u "GHCziBase_True_closure" -u "GHCziPack_unpackCString_closure" -u "GHCziIOBase_stackOverflow_closure" -u "GHCziIOBase_heapOverflow_closure" -u "GHCziIOBase_NonTermination_closure" -u "GHCziIOBase_BlockedOnDeadMVar_closure" -u "GHCziIOBase_Deadlock_closure" -u "GHCziWeak_runFinalizzerBatch_closure" -u "__stginit_Prelude" GenApply.o -lHSreadline -lHStemplate-haskell -lHSunix - lHSunix_cbits -lHSCabal -lHSregex-compat -lHSregex-posix -lHSregex- base -lHShaskell98 -lHSrts -lHSbase -lHSbase_cbits -lHSparsec -lgmp -lm /tmp/ghc-6.6/rts/libHSrts.a(GC.o)(.text+0x779): In function `GarbageCollect': : undefined reference to `markRootPtrTable' /tmp/ghc-6.6/libraries/base/libHSbase.a(Stable.o)(.text+0x360): In function `sxz_ret': : undefined reference to `hs_free_stable_ptr' /tmp/ghc-6.6/libraries/base/libHSbase.a(Typeable.o)(.text+0x2b85): In function `s4SA_ret': : undefined reference to `hs_free_stable_ptr' /tmp/ghc-6.6/libraries/base/libHSbase.a(Conc.o)(.text+0x3f7b): In function `base_GHCziConc_par_entry': : undefined reference to `newSpark' gmake[1]: *** [genapply] Error 1 gmake: *** [all] Error 1 gmake: Leaving directory `/tmp/ghc-6.6/utils' I am wondering what to try next. Could ghc-inplace on the target be crashing because of differences in say, ptr sizes on the host versus the target? Could I fool the host build into using 64 bit pointers by replacing explicit pointers with "long long" integers? Or should I try building a set of .hc files on a 64 bit linux host and use those to bootstrap the freebsd/amd64 target? Any help would be appreciated. Especially useful would be any comments on which parts of the instructions can be trusted and which may be bitrotted and needing revision. Best Wishes, Greg

3 4

RE: Feature proposal: ghc --full-flag-help ?
by Sittampalam, Ganesh 14 Mar '07

14 Mar '07

> What about integrating a complete list into ghc which can accessed by > ghc --full-flag-help | less ? > Sure I can fake it and get that list out of the html documentation. I > just want to know if someone else would like this flag, too I would find it very useful too. Ganesh ============================================================================== Please access the attached hyperlink for an important electronic communications disclaimer: http://www.credit-suisse.com/legal/en/disclaimer_email_ib.html ==============================================================================

8 8

documentation of -M option insufficient
by Marc Weber 14 Mar '07

14 Mar '07

The description of the -M option looks like this: -M Generate dependency information suitable for use in a Makefile. (copied from http://www.haskell.org/ghc/docs/latest/html/users_guide/flag-reference.html…) It should contain the hint that it writes this information to a Makefile. I'm thinking of something like -M writes dependency information suitable for use in a Makefile into the Makefile Is it worth filing a bug report? Marc

1 1