Commit 0534decd authored by simonmar's avatar simonmar
Browse files

[project @ 2002-10-15 13:18:51 by simonmar]

Remove looksLikeModuleName, it is defined in Util now.
parent 7e4c6988
{-# OPTIONS -#include "Linker.h" -#include "SchedAPI.h" #-}
-----------------------------------------------------------------------------
-- $Id: InteractiveUI.hs,v 1.135 2002/10/14 14:54:16 simonmar Exp $
-- $Id: InteractiveUI.hs,v 1.136 2002/10/15 13:18:51 simonmar Exp $
--
-- GHC Interactive User Interface
--
......@@ -1039,14 +1039,6 @@ printTimes allocs psecs
parens (text (secs_str "") <+> text "secs" <> comma <+>
int allocs <+> text "bytes")))
-----------------------------------------------------------------------------
-- utils
looksLikeModuleName [] = False
looksLikeModuleName (c:cs) = isUpper c && all isAlphaNumEx cs
isAlphaNumEx c = isAlphaNum c || c == '_' || c == '.'
-----------------------------------------------------------------------------
-- reverting CAFs
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment