March 9, 2003

From iceliebe@hanmail.net Tue Apr 1 08:33:23 2003 From: iceliebe@hanmail.net (=?EUC-KR?B?or3AzLbzILrSuK6/7LTCILi2wL3AxyC6tC4u?=) Date: Tue, 01 Apr 2003 17:33:23 +0900 (KST) Subject: HEllo? Message-ID: <20030401173323.HM.00000000000B6Vy@premium3.hanmail.net>

I did download Hugs98 but It is Dos evironment system.

I saw "Hugswin" which is window version. Where can I download that?


	Look, if you had one shot or one opportunity. To seize everything you ever wanted in one moment. Would you capture it or just let it slip?

"¿ì¸® ÀÎÅÍ³Ý, Daum" http://www.daum.net





	Place any of these banners on your website, and you will earn $10 every time you refer a sale to TrafficMagnet!

	Start making more money from your web space by reselling TrafficMagnet to your own customers and site visitors.

	Get the HTML code for our banners and text links by signing up as a Reseller today!

	Visit www.trafficmagnet.com to find out more!

Not interested in becoming a TrafficMagnet Reseller?
To be taken off our mailing list, please follow the instructions here.

--329293331.1051472679578.JavaMail.SYSTEM.emaserver2-- From burak.senguel@gmx.de Sun Apr 27 20:52:01 2003 From: burak.senguel@gmx.de (Dr. Ahmet Yalcin) Date: Sun, 27 Apr 2003 21:52:01 +0200 Subject: Arkadasa yardimci olalim Message-ID: <20030427195439.05FBA4221E8@www.haskell.org> Arkadaslar, lütfen dikkate alin, yardimci olalim: Merhaba, cok zor durumda ve baska caresi kalmamis biri olarak hosgörünüze ve insan sevginize siginarak sizden bana cok kisada olsa kulak vermenizi rica edecegim. Ben, 34 yasinda evli ve 4 yasinda olan bir cocuk babasiyim. Aile hayatimizin sorunsuz ve mutlu sekilde devam ederken biricik oglumuz aniden rahatsizlandi. Uzun süren arastirmalar sonucu oglumuz Ali Can'in kalbinde hayati bir fonksiyon bozuklugunun bulundugu doktorlar tarafindan tespit edildi. Oglumuz cok acil sekilde ameliyat olmazsa maalesef hayata gözlerini yumacak. Ancak ne varki ameliyat icin gerekli olan parayi ödememiz bizim icin mümkün gözükmüyor. Bu nedenle uzun ugraslar sonucu iki önemli Internet sirketi ile yaptigimiz görüsme sonucu, bize her mailde gönderecegimiz link'in tiklanmasi durumunda cocugumuzun ameliyat masraflarina 10 Cent (= 0,10 Euro) katkida bulunacaklari yönünde anlasmaya varabildik. Bu dogrultuda sizden rica edecegimiz, sizi sözkonusu sirketlerin sayfalarina yönelten bu linki tiklamaniz. Bu linki tiklayarak sizinde ameliyat masraflarini karsilamamizda katkiniz olabilir. Sizden bu zor durumumuzda istedigimiz sadece bir tik. >> TIKLAYINIZ --> http://partners.webmasterplan.com/click.asp?ref=160073&site=2514&type=text&tnb=1 Bunun yaninda bu emaili tüm tanidiklariniza gönderirseniz bize son derece yardimci olursunuz. Ne kadar kisi linki tiklarsa, gerekli olan ameliyat masrafini yakalayabilmemiz o kadar olasi olur. Hos görünüz icin tesekkür eder, saygilarimi sunarim. Mehmet Can Yakupoglu. From sigurd@12move.de Mon Apr 28 16:16:35 2003 From: sigurd@12move.de (Karl =?iso-8859-1?q?Pfl=E4sterer?=) Date: Mon, 28 Apr 2003 17:16:35 +0200 Subject: Hugs and cygwin Message-ID: Hi, I wanted to take a look at Haskell and thougt Hugs would be a good tool to start with. I have a windows as OS so I first downloaded the windows binaries. But they didn't play well with my editor (XEmacs). In XEmacs I have a command to send the content of a buffer to a hugs process; that command saves the buffer and calls in a running hugs process the command `:load' with the file name as parameter. But the windows version didn't understand the pathnames from my XEmacs (it is build under cygwin and for that uses unix path notation). So what to do? I could frob all functions in hugs mode that deal with sending filenames to send a pathname understood by a windows version of hugs. I didn't like that idea and tried to build from the source. It worked OOTB (and now I had readline in hugs) but there is one minor problem. If I use the `:edit' command with absolute pathnames the gets mangled in a weird way. Suppose I work on c:\ . If I start a session all looks fine ,---- | $ hugs -E"winclient %s" | __ __ __ __ ____ ___ _________________________________________ | || || || || || || ||__ Hugs 98: Based on the Haskell 98 standard | ||___|| ||__|| ||__|| __|| Copyright (c) 1994-2002 | ||---|| ___|| World Wide Web: http://haskell.org/hugs | || || Report bugs to: hugs-bugs@haskell.org | || || Version: November 2002 _________________________________________ | | Haskell 98 mode: Restart with command line option -98 to enable extensions | | Reading file "/usr/local/lib/hugs/lib/Prelude.hs": | | Hugs session for: | /usr/local/lib/hugs/lib/Prelude.hs `---- If I say now `edit' the editor is called with /c/usr/local/lib/hugs/lib/Prelude.hs as filename. if I work on another drive lets say e:\ the filename gets /e/usr/local/lib/hugs/lib/Prelude.hs But if I use a relative pathname; eg `:load ./foo.hs' and say after that `edit' all is fine. What can I do to change that behaviour? bye KP -- 'Twas brillig, and the slithy toves Did gyre and gimble in the wabe; All mimsy were the borogoves, And the mome raths outgrabe. "Lewis Carroll" "Jabberwocky" From alastair@reid-consulting-uk.ltd.uk Tue Apr 29 09:52:26 2003 From: alastair@reid-consulting-uk.ltd.uk (Alastair Reid) Date: Tue, 29 Apr 2003 09:52:26 +0100 Subject: Hugs and cygwin In-Reply-To: (sigurd@12move.de's message of "Mon, 28 Apr 2003 17:16:35 +0200") References: Message-ID: Karl Pflästerer writes: > Hi, I wanted to take a look at Haskell and thougt Hugs would be a > good tool to start with. I have a windows as OS so I first > downloaded the windows binaries. But they didn't play well with my > editor (XEmacs). There's probably better ways round this but my simple fix (which has worked well for more than 5 years) is not to use :set -E :edit etc I never really saw what using these commands bought you and you can certainly use Haskell and Hugs very successfully without them. [But other people find them very useful and can maybe suggest ways to use them on Windows with XEmacs.] -- Alastair Reid From meemoe_uk@yahoo.com Wed Apr 30 19:54:45 2003 From: meemoe_uk@yahoo.com (=?iso-8859-1?q?James=20Grist?=) Date: Wed, 30 Apr 2003 19:54:45 +0100 (BST) Subject: show tree Message-ID: <20030430185445.10628.qmail@web41303.mail.yahoo.com> ok, I've got a prob with this 'ere piece of code there is no Show instance for Tree, so I anticipated the result of typing... Nil at the hugs console, which was... ERROR - Cannot find "show" function for: *** Expression : Nil *** Of type : Tree a OK so far, next I tried to write a show instance for Tree ( near bottom, commented out here ), and I was suprised to get this error at the hugs console when I tried to compile it..... ERROR C:\My Documents\com2020\Heap.hs:16 - Overlapping instances for class "Show" *** This instance : Show (Tree a) *** Overlaps with : Show (Tree a) *** Common instance : Show (Tree a) I'm guessing that the compiler has decided that I've tried to declare a show instance for Tree twice. But if this is the case, why does typing "Nil" cause the error it does? Someone please explain. Thanks *** module Heap where class Heap h where empty :: Ord a => h a isEmpty :: Ord a => h a -> Bool insert :: Ord a => a -> h a -> h a merge :: Ord a => h a -> h a -> h a findMin :: Ord a => h a -> Maybe a deleteMin :: Ord a => h a -> h a toHeap :: (Ord a, Heap h) => [a] -> h a toHeap xs = foldr insert empty xs data Way = L | R deriving (Eq, Show) data Tree a = Nil | Node Way a (Tree a) (Tree a) deriving Show isNil :: Tree a -> Bool isNil Nil = True isNil _ = False isNode :: Tree a -> Bool isNode = not . isNil leftSub :: Tree a -> Tree a leftSub Nil = error "leftSub" leftSub (Node _ _ lt _) = lt rightSub :: Tree a -> Tree a rightSub Nil = error "rightSub" rightSub (Node _ _ _ rt) = rt root :: Tree a -> a root Nil = error "root" root (Node _ v _ _) = v insTree :: Ord a => a -> Tree a -> Tree a insTree val Nil = Node L val Nil Nil -- L is an arbitrary choice insTree val (Node way v lt rt) | v==val = Node way v lt rt -- no change, value in tree | val < v = if (way==L) then Node R val (insTree v lt) rt else Node L val lt (insTree v rt) | v < val = if (way==L) then Node R v (insTree val lt) rt else Node L v lt (insTree val rt) minTree :: Ord a => Tree a -> Maybe a minTree t | isNil t = Nothing | otherwise = Just(root t) deleteM :: Ord a => Tree a -> Tree a deleteM Nil = error "deleteM" deleteM (Node _ _ lt rt) = join lt rt join :: Ord a => Tree a -> Tree a -> Tree a join t Nil = t join Nil t = t join lt@(Node way1 v1 lt1 rt1) rt@(Node way2 v2 lt2 rt2) | v1 <= v2 = Node L v1 lt1 (join rt1 rt) | v2 < v1 = Node R v2 (join lt lt2) rt2 --instance (Show a) => Show (Tree a) where -- show a = "as" instance Heap Tree where empty = Nil isEmpty = isNil insert = insTree merge = join findMin = minTree deleteMin = deleteM *** __________________________________________________ Yahoo! Plus For a better Internet experience http://www.yahoo.co.uk/btoffer From Tom.Pledger@peace.com Wed Apr 30 21:08:31 2003 From: Tom.Pledger@peace.com (Tom Pledger) Date: Thu, 1 May 2003 08:08:31 +1200 Subject: show tree In-Reply-To: <20030430185445.10628.qmail@web41303.mail.yahoo.com> References: <20030430185445.10628.qmail@web41303.mail.yahoo.com> Message-ID: <16048.11583.104422.648638@tux-17.corp.peace.com> James Grist writes: | ok, | I've got a prob with this 'ere piece of code | there is no Show instance for Tree, so I anticipated | the result of typing... | | Nil | | at the hugs console, which was... | | ERROR - Cannot find "show" function for: | *** Expression : Nil | *** Of type : Tree a This is a variation on a frequently asked question: why does typing [] at the prompt cause an error message? You _do_ have a Show instance for Tree, thanks to your 'deriving Show' clause. The problem here is that hugs doesn't know what the type variable 'a' stands for. If it's a non-showable type, such as a function or an IO action, then 'Tree a' isn't showable either. Try it with a type signature: Nil :: Tree ()