"Committed_by_peb"

2005-02-09 11:46:54 +00:00
parent 4fd0c636f8
commit a0d4129863
55 changed files with 485 additions and 339 deletions
--- a/src/GF/Canon/PrExp.hs
+++ b/src/GF/Canon/PrExp.hs
@@ -9,20 +9,16 @@
 -- > CVS $Author $
 -- > CVS $Revision $
 --
-- (Description of the module)
+-- print trees without qualifications
 -----------------------------------------------------------------------------

-module PrExp where
+module PrExp (prExp) where

 import AbsGFC
 import GFC

 import Operations

-- some printing
-
-- print trees without qualifications
-
 prExp :: Exp -> String
 prExp e = case e of
  EApp f a   -> pr1 f +++ pr2 a