Update to changed CleanRegex

3ae2ca58 · Camil Staps · 6297f08b · 31eced6f · 526028f7 · 31eced6f
Verified Commit 3ae2ca58 authored Feb 02, 2019 by Camil Staps 🚀
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

CleanRegex CleanRegex +1 -1

Cloogle/DB.icl Cloogle/DB.icl +5 -0

No files found.
--- a/CleanRegex @ 31eced6f
+++ b/CleanRegex @ 31eced6f
-Subproject commit 526028f7fc2d5a10db66d65ef911466fd888cab8
+Subproject commit 31eced6fd86e6e6ef4cd614bd77bc69a2127e89c
--- a/Cloogle/DB.icl
+++ b/Cloogle/DB.icl
@@ -57,6 +57,11 @@ JSONDecode{|IndexArray|} infield json = case JSONDecode{|*|} infield json of
 	(Just xs,json) -> (Just {#x \\ x <- xs},json)
 	(Nothing,json) -> (Nothing,json)

+JSONEncode{|[!!]|} fx infield xs = JSONEncode{|*->*|} fx infield [x \\ x <|- xs]
+JSONDecode{|[!!]|} fx infield json = case JSONDecode{|*->*|} fx infield json of
+	(Just xs,json) -> (Just [|x \\ x <- xs],json)
+	(Nothing,json) -> (Nothing,json)
+
 derive JSONEncode ClassDoc, ClassEntry, ClassMemberDoc, CloogleEntry,
 	Constructor, ConstructorDoc, DeriveEntry, FunctionDoc, FunctionEntry,
 	InstanceEntry, Location, ModuleDoc, ModuleEntry, Priority, RecordField,