summaryrefslogtreecommitdiff
path: root/ddl/templates/data.purs.ede
diff options
context:
space:
mode:
Diffstat (limited to 'ddl/templates/data.purs.ede')
-rw-r--r--ddl/templates/data.purs.ede11
1 files changed, 7 insertions, 4 deletions
diff --git a/ddl/templates/data.purs.ede b/ddl/templates/data.purs.ede
index 0474931..490050a 100644
--- a/ddl/templates/data.purs.ede
+++ b/ddl/templates/data.purs.ede
@@ -10,11 +10,13 @@ import Data.Map (Map(..))
10import Data.List (List(..)) 10import Data.List (List(..))
11import Linear 11import Linear
12 12
13import Data.Argonaut.Combinators ((~>), (:=), (.?)) 13import Data.Argonaut.Encode.Combinators ((~>), (:=))
14import Data.Argonaut.Decode.Combinators ((.?))
14import Data.Argonaut.Core (jsonEmptyObject) 15import Data.Argonaut.Core (jsonEmptyObject)
15import Data.Argonaut.Printer (printJson) 16import Data.Argonaut.Printer (printJson)
16import Data.Argonaut.Encode (EncodeJson, encodeJson) 17import Data.Argonaut.Encode (class EncodeJson, encodeJson)
17import Data.Argonaut.Decode (DecodeJson, decodeJson) 18import Data.Argonaut.Decode (class DecodeJson, decodeJson)
19import Partial.Unsafe (unsafeCrashWith)
18 20
19{% for m in imports %} 21{% for m in imports %}
20import {{ m.value }} 22import {{ m.value }}
@@ -64,5 +66,6 @@ instance decodeJson{{ t.value.dataName }} :: DecodeJson {{ t.value.dataName }} w
64 {% if f.first %}{ {% else %}, {%endif%}{{ f.value.fieldName }}:{{ f.value.fieldName }}{% endfor %} 66 {% if f.first %}{ {% else %}, {%endif%}{{ f.value.fieldName }}:{{ f.value.fieldName }}{% endfor %}
65 } {% else %} 67 } {% else %}
66 "{{ c.value.name }}" -> {% for f in c.value.fields %}{% if f.first %}{{ c.value.name }} <$>{% else %} <*>{% endif %} obj .? "arg{{ f.index0 }}"{%else%}pure {{ c.value.name }}{% endfor %}{% endif %}{% endfor %} 68 "{{ c.value.name }}" -> {% for f in c.value.fields %}{% if f.first %}{{ c.value.name }} <$>{% else %} <*>{% endif %} obj .? "arg{{ f.index0 }}"{%else%}pure {{ c.value.name }}{% endfor %}{% endif %}{% endfor %}
69 _ -> unsafeCrashWith "decodeJson @ {{ t.value.dataName }}"
67 70
68{% endfor %} \ No newline at end of file 71{% endfor %}