diff options
| author | Csaba Hruska <csaba.hruska@gmail.com> | 2018-02-03 13:59:19 +0100 |
|---|---|---|
| committer | Csaba Hruska <csaba.hruska@gmail.com> | 2018-02-03 13:59:19 +0100 |
| commit | e91796d3cdc6304d8228483f1d41eea0f216f124 (patch) | |
| tree | 9a9363570eeceea2f1e8324c980f71d8ab4b6cfa | |
| parent | 1cf4ed5da574a6892df6b29b9a02fe94c5f6678f (diff) | |
hide debug message
| -rw-r--r-- | README.md | 2 | ||||
| -rw-r--r-- | src/LambdaCube/Compiler/DesugaredSource.hs | 2 |
2 files changed, 2 insertions, 2 deletions
| @@ -1,6 +1,6 @@ | |||
| 1 | # lambdacube-compiler | 1 | # lambdacube-compiler |
| 2 | 2 | ||
| 3 | [](https://travis-ci.org/lambdacube3d/lambdacube-compiler) | 3 | [](https://travis-ci.org/lambdacube3d/lambdacube-compiler) |
| 4 | 4 | ||
| 5 | Compiler for LambdaCube 3D, a Haskell-like purely functional domain specific language for programming the GPU (graphics processing unit). | 5 | Compiler for LambdaCube 3D, a Haskell-like purely functional domain specific language for programming the GPU (graphics processing unit). |
| 6 | 6 | ||
diff --git a/src/LambdaCube/Compiler/DesugaredSource.hs b/src/LambdaCube/Compiler/DesugaredSource.hs index ae2899bc..510b3de2 100644 --- a/src/LambdaCube/Compiler/DesugaredSource.hs +++ b/src/LambdaCube/Compiler/DesugaredSource.hs | |||
| @@ -96,7 +96,7 @@ instance Binary FileInfo | |||
| 96 | fileContent :: FileInfo -> String | 96 | fileContent :: FileInfo -> String |
| 97 | fileContent fi = unsafePerformIO $ do | 97 | fileContent fi = unsafePerformIO $ do |
| 98 | let fname = filePath fi | 98 | let fname = filePath fi |
| 99 | BS.putStrLn $ BS.pack $ printf "load source %s" fname | 99 | --BS.putStrLn $ BS.pack $ printf "load source %s" fname |
| 100 | readFile fname | 100 | readFile fname |
| 101 | 101 | ||
| 102 | instance Eq FileInfo where (==) = (==) `on` fileId | 102 | instance Eq FileInfo where (==) = (==) `on` fileId |