Searched defs:termToJson (Results 1 – 2 of 2) sorted by relevance
75 termToJson (TBigInt n) = Aeson.Number (fromIntegral n) function76 termToJson (TBytes ws) = Aeson.String (bytesToBase64Text ws) function78 termToJson (TString cs) = Aeson.String (T.pack cs) function79 termToJson (TStrings css) = Aeson.String (T.pack (concat css)) function82 termToJson (TMap kvs) = Aeson.object [ (T.pack k, termToJson v) function86 termToJson (TTagged _ t) = termToJson t function87 termToJson TTrue = Aeson.Bool True function88 termToJson TFalse = Aeson.Bool False function89 termToJson TNull = Aeson.Null function90 termToJson TUndef = Aeson.Null -- replacement value function[all …]