diff options
Diffstat (limited to 'src/Parser.hs')
| -rw-r--r-- | src/Parser.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/Parser.hs b/src/Parser.hs index c94e1e8..928dd88 100644 --- a/src/Parser.hs +++ b/src/Parser.hs @@ -44,8 +44,10 @@ parseTestDefinition = label "test definition" $ toplevel ToplevelTest $ do { testContext = SomeExpr $ varExpr SourceLineBuiltin rootNetworkVar } href <- L.indentLevel - testName <- header - testModuleName <- gets testCurrentModuleName + testNameBase <- header + testNameModule <- gets testCurrentModuleName + let testName = TestName {..} + osymbol ":" <* eol <* scn ref <- L.indentGuard scn GT href |