diff --git a/Cloogle/DB.icl b/Cloogle/DB.icl index de04530dc74e221807ecd5d995e806a3bc91ce1d..5e5ca00f4cd76ee3b67f0fd9da9ad70c87bd06f9 100644 --- a/Cloogle/DB.icl +++ b/Cloogle/DB.icl @@ -52,9 +52,8 @@ import Clean.Doc import Cloogle.API -:: IndexArray :== {#Index} -JSONEncode{|IndexArray|} infield xs = JSONEncode{|*|} infield [x \\ x <-: xs] -JSONDecode{|IndexArray|} infield json = case JSONDecode{|*|} infield json of +JSONEncode{|{#Index}|} infield xs = JSONEncode{|*|} infield [x \\ x <-: xs] +JSONDecode{|{#Index}|} infield json = case JSONDecode{|*|} infield json of (Just xs,json) -> (Just {#x \\ x <- xs},json) (Nothing,json) -> (Nothing,json)