diff --git a/semantic-python/src/Language/Python/Core.hs b/semantic-python/src/Language/Python/Core.hs index f3ca48783..37d0120d9 100644 --- a/semantic-python/src/Language/Python/Core.hs +++ b/semantic-python/src/Language/Python/Core.hs @@ -46,6 +46,9 @@ pattern SingleIdentifier name <- Py.ExpressionList ] } +prelude :: Has Core sig t => [Name] -> t Name +prelude = foldl' (\a b -> a ... b) (pure "__semantic_prelude") + -- We leave the representation of Core syntax abstract so that it's not -- possible for us to 'cheat' by pattern-matching on or eliminating a -- compiled term.