diff options
| author | bjorn <bjorn@bringert.net> | 2008-05-23 06:31:52 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-05-23 06:31:52 +0000 |
| commit | 003278e52d758fa5a11ebb2f82b30499d11fcbe7 (patch) | |
| tree | 122122405cfcb5d395e25b5b5256fbc2f2107fff /src-3.0/GF/System/Readline.hs | |
| parent | 954740933af1f60099bdc5c180bcc1f240eb614c (diff) | |
Added GF.System.Readline and related modules back into src-3.0.
Diffstat (limited to 'src-3.0/GF/System/Readline.hs')
| -rw-r--r-- | src-3.0/GF/System/Readline.hs | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/src-3.0/GF/System/Readline.hs b/src-3.0/GF/System/Readline.hs new file mode 100644 index 000000000..c12493f98 --- /dev/null +++ b/src-3.0/GF/System/Readline.hs @@ -0,0 +1,27 @@ +{-# OPTIONS -cpp #-} + +---------------------------------------------------------------------- +-- | +-- Module : GF.System.Readline +-- Maintainer : BB +-- Stability : (stable) +-- Portability : (portable) +-- +-- > CVS $Date: 2005/05/10 15:04:01 $ +-- > CVS $Author: bringert $ +-- > CVS $Revision: 1.2 $ +-- +-- Uses the right readline library to read user input. +----------------------------------------------------------------------------- + +module GF.System.Readline (fetchCommand) where + +#ifdef USE_READLINE + +import GF.System.UseReadline (fetchCommand) + +#else + +import GF.System.NoReadline (fetchCommand) + +#endif |