on master help sign in
add Json.isEmpty for checks in publishing
d338e37Evan Czaplicki
compiler/src/Json/String.hs+6
@@ -2,6 +2,7 @@
2{-# LANGUAGE BangPatterns, EmptyDataDecls #-}
2{-# LANGUAGE BangPatterns, EmptyDataDecls #-}
3module Json.String
3module Json.String
4 ( String
4 ( String
5+ , isEmpty
5 --
6 --
6 , fromPtr
7 , fromPtr
7 , fromName
8 , fromName
@@ -45,6 +46,11 @@ type String =
45data JSON_STRING
46data JSON_STRING
46
47
47
48
49+isEmpty :: String -> Bool
50+isEmpty =
51+ Utf8.isEmpty
52+
53+
48
54
49-- FROM
55-- FROM
50
56