@@ -375,8 +375,13 @@ variableToSrcType rootVariable variable =
375 return srcType
375 return srcType
377 Just (name, args) ->
377 Just (name, args) ->
379+ T.Type (Var.Canonical Var.BuiltIn _) ->
378− do args' <- mapM (\(arg,tvar) -> (,) arg <$> variableToSrcType rootVariable tvar) args
383+ do args' <- mapM (\(arg,tvar) -> (,) arg <$> variableToSrcType rootVariable tvar) args
379− return (T.Aliased name args' (T.Filled srcType))
384+ return (T.Aliased name args' (T.Filled srcType))
381 backupSrcType :: Descriptor -> IO T.CanonicalType
386 backupSrcType :: Descriptor -> IO T.CanonicalType
382 backupSrcType desc =
387 backupSrcType desc =