summaryrefslogtreecommitdiff
path: root/src/Transfer/Syntax/Layout.hs
diff options
context:
space:
mode:
authorbringert <bringert@cs.chalmers.se>2005-11-29 15:48:13 +0000
committerbringert <bringert@cs.chalmers.se>2005-11-29 15:48:13 +0000
commiteef20fa404f11fda0b9f73da1a3ee41db3201062 (patch)
treef03879bedcf2a7885b092d18581f11a994a008be /src/Transfer/Syntax/Layout.hs
parent2be80a7e3b4834bd3146ac9d2f27190fd0689d27 (diff)
Added meta variables to transfer front-end and core.
Diffstat (limited to 'src/Transfer/Syntax/Layout.hs')
-rw-r--r--src/Transfer/Syntax/Layout.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Transfer/Syntax/Layout.hs b/src/Transfer/Syntax/Layout.hs
index 9e8056a7d..31417038d 100644
--- a/src/Transfer/Syntax/Layout.hs
+++ b/src/Transfer/Syntax/Layout.hs
@@ -38,7 +38,7 @@ resolveLayout tp = res Nothing [if tl then Implicit 1 else Explicit]
-- We found an open brace in the input,
-- put an explicit layout block on the stack.
-- This is done even if there was no layout word,
- -- to keep of opening and closing braces.
+ -- to keep opening and closing braces.
| isLayoutOpen t0 = moveAlong (Explicit:st) [t0] ts
res _ st (t0:ts)