Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
GHC
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Iterations
Merge Requests
0
Merge Requests
0
Requirements
Requirements
List
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Security & Compliance
Security & Compliance
Dependency List
License Compliance
Operations
Operations
Incidents
Environments
Packages & Registries
Packages & Registries
Package Registry
Container Registry
Analytics
Analytics
CI / CD
Code Review
Insights
Issue
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Alex D
GHC
Commits
d78ab147
Commit
d78ab147
authored
Jun 20, 2008
by
Ian Lynagh
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Now that we require GHC >= 6.4.2, System.IO.Error is always available
parent
53ddf8f4
Changes
5
Hide whitespace changes
Inline
Side-by-side
Showing
5 changed files
with
4 additions
and
10 deletions
+4
-10
compiler/HsVersions.h
compiler/HsVersions.h
+0
-6
compiler/main/DriverMkDepend.hs
compiler/main/DriverMkDepend.hs
+1
-1
compiler/main/DriverPipeline.hs
compiler/main/DriverPipeline.hs
+1
-1
compiler/main/SysTools.lhs
compiler/main/SysTools.lhs
+1
-1
compiler/utils/Util.lhs
compiler/utils/Util.lhs
+1
-1
No files found.
compiler/HsVersions.h
View file @
d78ab147
...
...
@@ -22,12 +22,6 @@ you will screw up the layout where they are used in case expressions!
* settings for the target plat instead). */
#include "../includes/ghcautoconf.h"
#if !defined(__GLASGOW_HASKELL__) || __GLASGOW_HASKELL__ >= 602
#define SYSTEM_IO_ERROR System.IO.Error
#else
#define SYSTEM_IO_ERROR System.IO
#endif
/* Global variables may not work in other Haskell implementations,
* but we need them currently! so the conditional on GLASGOW won't do. */
#if defined(__GLASGOW_HASKELL__) || !defined(__GLASGOW_HASKELL__)
...
...
compiler/main/DriverMkDepend.hs
View file @
d78ab147
...
...
@@ -38,7 +38,7 @@ import System.Exit ( ExitCode(..), exitWith )
import
System.Directory
import
System.FilePath
import
System.IO
import
S
YSTEM_IO_ERROR
(
isEOFError
)
import
S
ystem.IO.Error
(
isEOFError
)
import
Control.Monad
(
when
)
import
Data.Maybe
(
isJust
)
...
...
compiler/main/DriverPipeline.hs
View file @
d78ab147
...
...
@@ -53,7 +53,7 @@ import GHC.Exts ( Int(..) )
import
System.Directory
import
System.FilePath
import
System.IO
import
S
YSTEM_IO_ERROR
as
IO
import
S
ystem.IO.Error
as
IO
import
Control.Monad
import
Data.List
(
isSuffixOf
)
import
Data.Maybe
...
...
compiler/main/SysTools.lhs
View file @
d78ab147
...
...
@@ -52,7 +52,7 @@ import System.Exit
import System.Environment
import System.FilePath
import System.IO
import S
YSTEM_IO_ERROR
as IO
import S
ystem.IO.Error
as IO
import System.Directory
import Data.Char
import Data.Maybe
...
...
compiler/utils/Util.lhs
View file @
d78ab147
...
...
@@ -94,7 +94,7 @@ import FastTypes
#endif
import Control.Monad ( unless )
import S
YSTEM_IO_ERROR
as IO ( catch, isDoesNotExistError )
import S
ystem.IO.Error
as IO ( catch, isDoesNotExistError )
import System.Directory ( doesDirectoryExist, createDirectory,
getModificationTime )
import System.FilePath hiding ( searchPathSeparator )
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment