@@ -15,7 +15,7 @@ hints = mapM toScheme values
1515 addPrefixes = concatMap (\(m,vs) -> map (first (\n -> m ++ "." ++ n)) vs)
1616 values = addPrefixes (Map.toList (Map.map Map.toList libraries))
1717 toScheme (name, tipeString) =
18− case iParse (fmap toType typeExpr) "libraries" tipeString of
18+ case iParse (fmap toType typeExpr) "parsing types in docs.json" tipeString of
1919 Left err -> error (show err)
2020 Right tipe -> do scheme <- generalize [] (Forall [] [] tipe)
2121 return (name, scheme)