From ead494ad3f2ff7da12e16651b01f371ff450a342 Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Tue, 11 Jun 2019 12:57:27 -0400 Subject: [PATCH] These are incurred by IfStatement. --- semantic-python/src/Language/Python/Core.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/semantic-python/src/Language/Python/Core.hs b/semantic-python/src/Language/Python/Core.hs index a2e4c24ba..dc43d6dab 100644 --- a/semantic-python/src/Language/Python/Core.hs +++ b/semantic-python/src/Language/Python/Core.hs @@ -27,10 +27,8 @@ instance Compile Py.Module where deriving via CompileSum Py.CompoundStatement instance Compile Py.CompoundStatement -instance Compile Py.Block instance Compile Py.ClassDefinition instance Compile Py.DecoratedDefinition -instance Compile Py.Expression instance Compile Py.IfStatement where compile IfStatement{..} = If <$> compile condition <*> compile consequence <*> case alternative of @@ -39,6 +37,9 @@ instance Compile Py.IfStatement where where clause (Left (ElifClause{..})) rest = If <$> compile condition <*> compile consequence <*> rest clause (Right (ElseClause body)) _ = compile body +instance Compile Py.Block +instance Compile Py.Expression + instance Compile Py.ForStatement instance Compile Py.FunctionDefinition instance Compile Py.TryStatement