]> gerrit.simantics Code Review - simantics/platform.git/blob - bundles/org.simantics.scl.data/scl/Data/JsonNode.scl
Fix to OrderedSetTemplate, preference for autocompletion
[simantics/platform.git] / bundles / org.simantics.scl.data / scl / Data / JsonNode.scl
1 import "StandardLibrary"
2 import "Data/Writer"
3 import "JavaBuiltin" as Java
4 import "Data/Json"
5
6 importJava "com.fasterxml.jackson.databind.JsonNode" where
7     data JsonNode
8
9 importJava "org.simantics.scl.data.xml.JsonNodeHelper" where
10     @private
11     @JavaName toJsonString
12     jsonNodeToString :: JsonNode -> String
13     @private
14     @JavaName fromJsonString
15     stringToJsonNode :: String -> JsonNode
16
17 jsonNodeToJson :: JsonNode -> Json
18 jsonNodeToJson node = fromJsonString (jsonNodeToString node)
19
20 jsonToJsonNode :: Json -> JsonNode
21 jsonToJsonNode json = stringToJsonNode (toJsonString json)
22
23