[project @ 2000-07-10 16:15:33 by rrt]

Removed carriage returns (\r) from source files. Please don't check in such
things; they can cause problems on Cygwin (funnily enough). I'm looking into
how to avoid commiting carriage returns when working under Windows.

ghc/ANNOUNCE

-	     The Glasgow Haskell Compiler -- version 4.08
-	    ==============================================
-
-We are pleased to announce a new release of the Glasgow Haskell
-Compiler (GHC), version 4.08.  The source distribution is freely
-available via the World-Wide Web and through anon. FTP; details below.
-
-Haskell is "the" standard lazy functional programming language; the
-current language version is Haskell 98, agreed in December 1998.
-Haskell related information is available from the Haskell home page at
-
-	http://www.haskell.org/
-
-GHC's Web page lives at
-
-	http://www.haskell.org/ghc/
-
-+ What's new
-=============
-
-This should be a stable release.  There have been many enhancements
-since 4.06, and shed-loads of bug-fixes (one shed (imperial) ~ one ton
-(US)).
-
-There are the following changes
-
-   - New profiling subsystem, based on cost-centre stacks.
-
-   - Working x86 native code generator: now it works properly, runs
-     about twice as fast as compiling via C, and is on a par for
-     run-time speed (except in FP-intensive programs).
-
-   - Implicit parameters (i.e. dynamic scoping without the pain).
-
-   - DEPRECATED pragma for marking obsolescent interfaces.
-
-   - In the wake of hslibs, a new package system for
-     libraries. -package should now be used instead of -syslib.
-
-   - Result type signatures work.
-
-   - Many tiresome long-standing bugs and problems (e.g. the trace
-     problem) have been fixed.
-
-   - Many error messages have been made more helpful and/or
-     accurate.
-
-For full details see the release notes:
-
-	http://www.haskell.org/ghc/docs/4.08/users_guide/release-4-08.html
-
-
-+ Mailing lists
-================
-
-We run mailing lists for GHC users and bug reports; to subscribe, send
-mail to majordomo@haskell.org; the msg body should be:
-
-    subscribe glasgow-haskell-{users,bugs} Your Name <you@where.soever>
-
-or
-
-    subscribe cvs-ghc Your Name <you@where.soever>
-
-Please send bug reports about GHC to glasgow-haskell-bugs@haskell.org;
-GHC users hang out on glasgow-haskell-users@haskell.org.  Bleeding
-edge CVS users party on cvs-ghc@haskell.org.
-
-
-+ On-line GHC-related resources
-================================
-
-Relevant URLs on the World-Wide Web:
-
-GHC home page    	  http://www.haskell.org/ghc/
-Haskell home page	  http://www.haskell.org/
-comp.lang.functional FAQ  http://www.cs.nott.ac.uk/~gmh/faq.html
-
-
-+ How to get it
-================
-
-The easy way is to go to the WWW page, which should be
-self-explanatory:
-
-	http://www.haskell.org/ghc/
-
-Once you have the distribution, please follow the pointers in the
-README file to find all of the documentation about this release.  NB:
-preserve modification times when un-tarring the files (no `m' option
-for tar, please)!
-
-
-+ System requirements
-======================
-
-To compile the sources, you need a machine with 32+MB memory, GNU C
-(`gcc'), `perl' plus a version of GHC installed (3.02 at least).  This
-release is known to work on the following platforms:
-
-  * i386-unknown-{linux,freebsd,netbsd,cygwin32,mingw32}
-  * sparc-sun-{sunos4,solaris2}
-  * hppa1.1-hp-hpux{9,10}
-
-Ports to the following platforms should be relatively easy (for a
-wunderhacker), but haven't been tested due to lack of time/hardware:
-
-  * i386-unknown-solaris2
-  * alpha-dec-osf{2,3}
-  * mips-sgi-irix{5,6}
-  * {rs6000,powerpc}-ibm-aix
-
-The builder's guide included in distribution gives a complete
-run-down of what ports work; an on-line version can be found at
-
-   http://www.haskell.org/ghc/docs/4.08/building/building-guide.html
+	     The Glasgow Haskell Compiler -- version 4.08
+	    ==============================================
+
+We are pleased to announce a new release of the Glasgow Haskell
+Compiler (GHC), version 4.08.  The source distribution is freely
+available via the World-Wide Web and through anon. FTP; details below.
+
+Haskell is "the" standard lazy functional programming language; the
+current language version is Haskell 98, agreed in December 1998.
+Haskell related information is available from the Haskell home page at
+
+	http://www.haskell.org/
+
+GHC's Web page lives at
+
+	http://www.haskell.org/ghc/
+
++ What's new
+=============
+
+This should be a stable release.  There have been many enhancements
+since 4.06, and shed-loads of bug-fixes (one shed (imperial) ~ one ton
+(US)).
+
+There are the following changes
+
+   - New profiling subsystem, based on cost-centre stacks.
+
+   - Working x86 native code generator: now it works properly, runs
+     about twice as fast as compiling via C, and is on a par for
+     run-time speed (except in FP-intensive programs).
+
+   - Implicit parameters (i.e. dynamic scoping without the pain).
+
+   - DEPRECATED pragma for marking obsolescent interfaces.
+
+   - In the wake of hslibs, a new package system for
+     libraries. -package should now be used instead of -syslib.
+
+   - Result type signatures work.
+
+   - Many tiresome long-standing bugs and problems (e.g. the trace
+     problem) have been fixed.
+
+   - Many error messages have been made more helpful and/or
+     accurate.
+
+For full details see the release notes:
+
+	http://www.haskell.org/ghc/docs/4.08/users_guide/release-4-08.html
+
+
++ Mailing lists
+================
+
+We run mailing lists for GHC users and bug reports; to subscribe, send
+mail to majordomo@haskell.org; the msg body should be:
+
+    subscribe glasgow-haskell-{users,bugs} Your Name <you@where.soever>
+
+or
+
+    subscribe cvs-ghc Your Name <you@where.soever>
+
+Please send bug reports about GHC to glasgow-haskell-bugs@haskell.org;
+GHC users hang out on glasgow-haskell-users@haskell.org.  Bleeding
+edge CVS users party on cvs-ghc@haskell.org.
+
+
++ On-line GHC-related resources
+================================
+
+Relevant URLs on the World-Wide Web:
+
+GHC home page    	  http://www.haskell.org/ghc/
+Haskell home page	  http://www.haskell.org/
+comp.lang.functional FAQ  http://www.cs.nott.ac.uk/~gmh/faq.html
+
+
++ How to get it
+================
+
+The easy way is to go to the WWW page, which should be
+self-explanatory:
+
+	http://www.haskell.org/ghc/
+
+Once you have the distribution, please follow the pointers in the
+README file to find all of the documentation about this release.  NB:
+preserve modification times when un-tarring the files (no `m' option
+for tar, please)!
+
+
++ System requirements
+======================
+
+To compile the sources, you need a machine with 32+MB memory, GNU C
+(`gcc'), `perl' plus a version of GHC installed (3.02 at least).  This
+release is known to work on the following platforms:
+
+  * i386-unknown-{linux,freebsd,netbsd,cygwin32,mingw32}
+  * sparc-sun-{sunos4,solaris2}
+  * hppa1.1-hp-hpux{9,10}
+
+Ports to the following platforms should be relatively easy (for a
+wunderhacker), but haven't been tested due to lack of time/hardware:
+
+  * i386-unknown-solaris2
+  * alpha-dec-osf{2,3}
+  * mips-sgi-irix{5,6}
+  * {rs6000,powerpc}-ibm-aix
+
+The builder's guide included in distribution gives a complete
+run-down of what ports work; an on-line version can be found at
+
+   http://www.haskell.org/ghc/docs/4.08/building/building-guide.html

ghc/interpreter/test/static/s108.hs

---!!! Testing export of unknown name
-module Bar(bar) where
+--!!! Testing export of unknown name
+module Bar(bar) where
 foo = foo
\ No newline at end of file

ghc/tests/typecheck/should_compile/tc105.hs

-{-# OPTIONS -fglasgow-exts #-}
-
--- !!! Scoped type variables in result signatures
-module ShouldCompile where
-
-import PrelST
-import PrelArr
-
-f:: ST s Int
-f:: ST s Int = do
-    v <- newSTRef 5
-    let g :: ST s Int
-             -- ^ should be in scope
-        g = readSTRef v
-    g
+{-# OPTIONS -fglasgow-exts #-}
+
+-- !!! Scoped type variables in result signatures
+module ShouldCompile where
+
+import PrelST
+import PrelArr
+
+f:: ST s Int
+f:: ST s Int = do
+    v <- newSTRef 5
+    let g :: ST s Int
+             -- ^ should be in scope
+        g = readSTRef v
+    g

glafp-utils/docbook/Makefile

 TOP=..
 include $(TOP)/mk/boilerplate.mk
 
-SUBDIRS = db2dvi.dir db2html.dir db2pdf.dir db2ps.dir db2rtf.dir
+SUBDIRS = db2dvi.dir db2html.dir db2pdf.dir db2ps.dir db2rtf.dir \
+          dbindex.dir
 
 include $(TOP)/mk/target.mk

glafp-utils/nofib-analyse/ClassTable.hs

------------------------------------------------------------------------------
--- 	TableClass : Class for combinators used in building 2D tables.
---
--- 	Copyright (c) 1999 Andy Gill
---
--- This module is distributed as Open Source software under the
--- Artistic License; see the file "Artistic" that is included
--- in the distribution for details.
------------------------------------------------------------------------------
-
-module ClassTable (
-		Table(..),
-		showsTable,
-		showTable,
-	) where
-
-infixr 4 `beside`
-infixr 3 `above`
-
-{----------------------------------------------------------------------------
-   These combinators can be used to build formated 2D tables.
-   The specific target useage is for HTML table generation.
- ----------------------------------------------------------------------------
-
-   Examples of use:
-
-  	> table1 :: (Table t) => t String
-  	> table1 = single "Hello"	+-----+
-					|Hello|
-	  This is a 1x1 cell		+-----+
-	  Note: single has type
-	 
-		single :: (Table t) => a -> t a
-	
-	  So the cells can contain anything.
-	
-	> table2 :: (Table t) => t String
-	> table2 = single "World"	+-----+
-					|World|
-					+-----+
-
-
-	> table3 :: (Table t) => t String
-	> table3 = table1 %-% table2	+-----%-----+
-					|Hello%World|
-	 % is used to indicate		+-----%-----+
-	 the join edge between
-	 the two Tables.  
-
-	> table4 :: (Table t) => t String
-	> table4 = table3 %/% table2	+-----+-----+
-					|Hello|World|
-	  Notice the padding on the	%%%%%%%%%%%%%
-	  smaller (bottom) cell to	|World      |
-	  force the table to be a	+-----------+
-	  rectangle.
-
-	> table5 :: (Table t) => t String
-	> table5 = table1 %-% table4	+-----%-----+-----+
-					|Hello%Hello|World|
-	  Notice the padding on the	|     %-----+-----+
-	  leftmost cell, again to	|     %World      |
-	  force the table to be a	+-----%-----------+
-	  rectangle.
- 
-   Now the table can be rendered with processTable, for example:
-	Main> processTable table5
-	[[("Hello",(1,2)),
-	  ("Hello",(1,1)),
-	  ("World",(1,1))],
-	 [("World",(2,1))]] :: [[([Char],(Int,Int))]]
-	Main> 
-
-----------------------------------------------------------------------------}
-
-class Table t where
-	-- There are no empty tables
-
-	--Single element table
-  single       :: a          -> t a
-	-- horizontal composition
-  beside       :: t a -> t a -> t a
-	-- vertical composition
-  above        :: t a -> t a -> t a
-	-- generation of raw table matrix
-  getMatrix    :: t a -> [[(a,(Int,Int))]]
-
-showsTable :: (Show a,Table t) => t a -> ShowS
-showsTable table = shows (getMatrix table)
-
-showTable :: (Show a,Table t) => t a -> String
-showTable table = showsTable table ""
-
-
+-----------------------------------------------------------------------------
+-- 	TableClass : Class for combinators used in building 2D tables.
+--
+-- 	Copyright (c) 1999 Andy Gill
+--
+-- This module is distributed as Open Source software under the
+-- Artistic License; see the file "Artistic" that is included
+-- in the distribution for details.
+-----------------------------------------------------------------------------
+
+module ClassTable (
+		Table(..),
+		showsTable,
+		showTable,
+	) where
+
+infixr 4 `beside`
+infixr 3 `above`
+
+{----------------------------------------------------------------------------
+   These combinators can be used to build formated 2D tables.
+   The specific target useage is for HTML table generation.
+ ----------------------------------------------------------------------------
+
+   Examples of use:
+
+  	> table1 :: (Table t) => t String
+  	> table1 = single "Hello"	+-----+
+					|Hello|
+	  This is a 1x1 cell		+-----+
+	  Note: single has type
+	 
+		single :: (Table t) => a -> t a
+	
+	  So the cells can contain anything.
+	
+	> table2 :: (Table t) => t String
+	> table2 = single "World"	+-----+
+					|World|
+					+-----+
+
+
+	> table3 :: (Table t) => t String
+	> table3 = table1 %-% table2	+-----%-----+
+					|Hello%World|
+	 % is used to indicate		+-----%-----+
+	 the join edge between
+	 the two Tables.  
+
+	> table4 :: (Table t) => t String
+	> table4 = table3 %/% table2	+-----+-----+
+					|Hello|World|
+	  Notice the padding on the	%%%%%%%%%%%%%
+	  smaller (bottom) cell to	|World      |
+	  force the table to be a	+-----------+
+	  rectangle.
+
+	> table5 :: (Table t) => t String
+	> table5 = table1 %-% table4	+-----%-----+-----+
+					|Hello%Hello|World|
+	  Notice the padding on the	|     %-----+-----+
+	  leftmost cell, again to	|     %World      |
+	  force the table to be a	+-----%-----------+
+	  rectangle.
+ 
+   Now the table can be rendered with processTable, for example:
+	Main> processTable table5
+	[[("Hello",(1,2)),
+	  ("Hello",(1,1)),
+	  ("World",(1,1))],
+	 [("World",(2,1))]] :: [[([Char],(Int,Int))]]
+	Main> 
+
+----------------------------------------------------------------------------}
+
+class Table t where
+	-- There are no empty tables
+
+	--Single element table
+  single       :: a          -> t a
+	-- horizontal composition
+  beside       :: t a -> t a -> t a
+	-- vertical composition
+  above        :: t a -> t a -> t a
+	-- generation of raw table matrix
+  getMatrix    :: t a -> [[(a,(Int,Int))]]
+
+showsTable :: (Show a,Table t) => t a -> ShowS
+showsTable table = shows (getMatrix table)
+
+showTable :: (Show a,Table t) => t a -> String
+showTable table = showsTable table ""
+
+

glafp-utils/nofib-analyse/DataHtml.hs

--------------------------------------------------------------------------------
--- $Id: DataHtml.hs,v 1.1 1999/11/12 11:54:17 simonmar Exp $
---
--- Copyright (c) 1999 Andy Gill
--------------------------------------------------------------------------------
-
-module DataHtml (
-	Html, HtmlName, HtmlAttr, HtmlTable,
-	(+++), verbatim, {- tag, atag, -} noHtml, primHtml, 
-	concatHtml, htmlStr, htmlLine,
-	h1,h2,h3,h4,h5,h6, 	
-	font, bold, anchor, header, body, theTitle, paragraph, italics,
-	ul, tt,
-	bar, meta, li,
-	{- tr, int, percent -}
-	color, bgcolor, href, name, title, height, width, align, valign,
-	border, size, cellpadding, cellspacing,
-	p, hr, copyright, spaceHtml, 
-	renderHtml, 
-	cellHtml, (+/+), above, (+-+), beside, aboves, besides,		
-	renderTable, simpleTable, 
-	) where
-
-import qualified OptTable as OT
-
-infixr 5 +++	-- appending Html
-infixr 3 +/+	-- combining HtmlTable
-infixr 4 +-+	-- combining HtmlTable
-
-data Html
-	= HtmlAppend Html Html		  -- Some Html, followed by more text
-	| HtmlVerbatim Html		  -- Turn on or off smart formating
-	| HtmlEmpty			  -- Nothing!
-	| HtmlNestingTag HtmlName [HtmlAttr] Html
-	| HtmlSimpleTag  HtmlName [HtmlAttr]
-	| HtmlString String
-		deriving (Show)
-
-{-
- - A important property of Html is all strings inside the
- - structure are already in Html friendly format.
- - For example, use of >,etc.
- -}
-
-type HtmlName	= String
-type HtmlAttr	= (HtmlName,Either Int String)
-type HtmlTable	= OT.OptTable (Int -> Int -> Html)
-
-------------------------------------------------------------------------------
--- Interface
-------------------------------------------------------------------------------
-
--- primitive combinators
-(+++) 		:: Html -> Html 		-> Html
-verbatim	:: Html 			-> Html
-tag 		:: String -> [HtmlAttr] -> Html -> Html
-atag 		:: String -> [HtmlAttr] 	-> Html
-noHtml  	:: 				   Html
-primHtml 	:: String 			-> Html
-
--- useful combinators
-concatHtml 		:: [Html] 			-> Html
-htmlStr, htmlLine 	:: String 			-> Html
-
--- html constructors
-h1,h2,h3,h4,h5,h6 	:: [HtmlAttr] -> Html		-> Html
-font, bold, anchor, 
- header, body, 
- theTitle, paragraph,
- italics, ul, tt	:: [HtmlAttr] -> Html		-> Html
-bar, meta, li		:: [HtmlAttr]			-> Html
-
--- html attributes
-str 			:: String -> String 		-> HtmlAttr
-int 			:: String -> Int 		-> HtmlAttr
-percent 		:: String -> Int 		-> HtmlAttr
-
-color, bgcolor, href,
- name, title, height,
- width, align, valign	:: String			-> HtmlAttr
-
-border, size,
- cellpadding,
- cellspacing		:: Int				-> HtmlAttr 
-
--- abbriviations
-
-p			:: Html				-> Html
-hr			::				   Html
-copyright		::				   Html
-spaceHtml		::				   Html
-
--- rendering
-renderHtml 		:: Html -> String
-
--- html tables
-cellHtml		:: [HtmlAttr] -> Html 		-> HtmlTable
-(+/+),above,
- (+-+),beside 		:: HtmlTable -> HtmlTable 	-> HtmlTable
-aboves, besides		:: [HtmlTable] 			-> HtmlTable
-renderTable 		:: [HtmlAttr] -> HtmlTable 	-> Html
-simpleTable 		:: [HtmlAttr] -> [HtmlAttr] -> [[Html]] 
-							-> Html
-
-------------------------------------------------------------------------------
--- Basic, primitive combinators
-
--- This is intentionally lazy in the second argument.
-(HtmlAppend x y) +++ z = x +++ (y +++ z)
-(HtmlEmpty)      +++ z = z
-x                +++ z = HtmlAppend x z
-
-verbatim 	= HtmlVerbatim
-tag 		= HtmlNestingTag
-atag 		= HtmlSimpleTag
-noHtml 		= HtmlEmpty
-
--- This is not processed for special chars. 
--- It is used to output them, though!
-primHtml 	= HtmlString
-
-------------------------------------------------------------------------------
--- Useful Combinators
-
-concatHtml = foldr (+++) noHtml
--- Processing Strings into Html friendly things.
--- This converts a string to an Html.
-htmlStr = primHtml . htmlizeStr
-
--- This converts a string, but keeps spaces as non-line-breakable
-htmlLine = primHtml . concat . map htmlizeChar2
-   where 
-	htmlizeChar2 ' ' = " "
-	htmlizeChar2 c   = htmlizeChar c
-
--- Local Utilites
-htmlizeStr :: String -> String
-htmlizeStr = concat . map htmlizeChar
-
-htmlizeChar :: Char -> String
-htmlizeChar '<' = "&gt;"
-htmlizeChar '>' = "&lt;"
-htmlizeChar '&' = "&amb;"
-htmlizeChar '"' = "&quot;"
-htmlizeChar c   = [c]
-
-------------------------------------------------------------------------------
--- Html Constructors
-h n = tag ("h" ++ show n)
-
--- Isn't Haskell great!