File tree Expand file tree Collapse file tree 4 files changed +9
-6
lines changed Expand file tree Collapse file tree 4 files changed +9
-6
lines changed Original file line number Diff line number Diff line change @@ -32,6 +32,7 @@ import GHC.Generics (Generic)
3232import qualified Language.PureScript as P
3333import qualified Language.PureScript.Bundle as Bundle
3434import qualified Language.PureScript.CodeGen.JS as J
35+ import qualified Language.PureScript.CodeGen.JS.Printer as P
3536import qualified Language.PureScript.CoreFn as CF
3637import qualified Language.PureScript.Errors.JSON as P
3738import qualified Language.PureScript.Interactive as I
@@ -105,13 +106,13 @@ server bundled externs initEnv port = do
105106 Nothing -> Scotty. json $ A. object [ " error" .= (" Cannot parse type" :: Text ) ]
106107 Just ty -> do
107108 let elabs = lookupAllConstructors initEnv ty
108- search = M. toList . TS. typeSearch (Just [] ) initEnv (P. emptyCheckState initEnv)
109+ search = fst . TS. typeSearch (Just [] ) initEnv (P. emptyCheckState initEnv)
109110 results = nubBy ((==) `on` fst ) $ do
110111 elab <- elabs
111112 let strictMatches = search (replaceTypeVariablesAndDesugar (\ nm s -> P. Skolem nm s (P. SkolemScope 0 ) Nothing ) elab)
112113 flexMatches = search (replaceTypeVariablesAndDesugar (const P. TUnknown ) elab)
113114 take 50 (strictMatches ++ flexMatches)
114- Scotty. json $ A. object [ " results" .= [ P. showQualified P. runIdent k
115+ Scotty. json $ A. object [ " results" .= [ P. showQualified id k
115116 | (k, _) <- take 50 results
116117 ]
117118 ]
Original file line number Diff line number Diff line change @@ -3,7 +3,8 @@ flags: {}
33packages :
44- ' .'
55extra-deps :
6- - purescript-0.10.5
6+ - purescript-0.11.1
77- bower-json-1.0.0.1
88- language-javascript-0.6.0.9
9+ - optparse-applicative-0.13.2.0
910- parsec-3.1.11
Original file line number Diff line number Diff line change 11{
22 "name" : " core" ,
3- "set" : " psc-0.10.2 " ,
3+ "set" : " psc-0.11.1 " ,
44 "source" : " https://github.com/purescript/package-sets.git" ,
55 "depends" : [
66 " arrays" ,
4545 " tailrec" ,
4646 " transformers" ,
4747 " tuples" ,
48+ " typelevel-prelude" ,
4849 " unfoldable" ,
4950 " validation"
5051 ]
Original file line number Diff line number Diff line change 11name : trypurescript
2- version : 0.10.5
2+ version : 0.11.1
33cabal-version : >= 1.8
44build-type : Simple
55license : BSD3
@@ -20,7 +20,7 @@ executable trypurescript
2020 filepath -any,
2121 Glob -any,
2222 scotty -any,
23- purescript == 0.10.5 ,
23+ purescript == 0.11.1 ,
2424 containers -any,
2525 http-types >= 0.8.5 ,
2626 transformers == 0.4. *,
You can’t perform that action at this time.
0 commit comments