Package: hat
Version: 2.05-7
Severity: grave
% cat z.hs
data Node = Node String [Node] | Text String
tag t e@(Node t' _) | t == t' = [e]
tag _ _ = []
children (Node _ c) = c
children _ = []
text (Text s) = [s]
text _ = []
container s x = tag s x >>= children
textNode s x = container s x >>= text
mainA x = do
z <- container "xml" x
a <- textNode "noBallots" z
b <- textNode "noDs" z
return (a, b)
main = do
print $ mainA (Node "xml" [Node "noBallots" [Text "nb"], Node "noDs" [Text
"nd"]])
% hmake -hat z
hat-trans z.hs
Wrote Hat/z.hs
/usr/bin/haskell-compiler -c -package hat -o Hat/z.o Hat/z.hs
/usr/bin/haskell-compiler -package hat -o z Hat/z.o
% ./z
[]
% hat-trail z
hat-trail: attempt to read beyond end of file
hat-trail: offset = 0x3000000, filesize = 0x28b6
hat-trail: errno = 0 (Success)
-- System Information:
Debian Release: 4.0
APT prefers unstable
APT policy: (500, 'unstable')
Architecture: amd64 (x86_64)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.19
Locale: LANG=C, LC_CTYPE=C (charmap=ANSI_X3.4-1968)
Versions of packages hat depends on:
ii libc6 2.3.6.ds1-9 GNU C Library: Shared libraries
ii libghc6-hat-dev 2.05-7 Haskell source-level tracer librar
ii libglib1.2 1.2.10-17 The GLib library of C routines
ii libgmp3c2 2:4.2.1+dfsg-4 Multiprecision arithmetic library
ii libncurses5 5.5-5 Shared libraries for terminal hand
ii libreadline5 5.2-1 GNU readline and history libraries
Versions of packages hat recommends:
ii hmake 3.12-1 The Haskell Make System
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
