diff options
Diffstat (limited to 'compiler/src/Files.hs')
| -rw-r--r-- | compiler/src/Files.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/src/Files.hs b/compiler/src/Files.hs index 457f1da..ed082ba 100644 --- a/compiler/src/Files.hs +++ b/compiler/src/Files.hs | |||
| @@ -81,7 +81,7 @@ fileName :: Path -> FileName | |||
| 81 | fileName (Path (name:_)) = name | 81 | fileName (Path (name:_)) = name |
| 82 | 82 | ||
| 83 | subPaths :: Path -> [Path] | 83 | subPaths :: Path -> [Path] |
| 84 | subPaths (Path path) = map (Path . subsequences) path | 84 | subPaths (Path path) = map Path $ subsequences path |
| 85 | 85 | ||
| 86 | pathLength :: Path -> Int | 86 | pathLength :: Path -> Int |
| 87 | pathLength (Path path) = Data.List.length path | 87 | pathLength (Path path) = Data.List.length path |