ecere/sys/JSON: Fixed serialization of bit classes

diff --git a/ecere/src/sys/JSON.ec b/ecere/src/sys/JSON.ec
index 1b94380..a6bebd7 100644 (file)
--- a/ecere/src/sys/JSON.ec
+++ b/ecere/src/sys/JSON.ec
@@ -878,10 +878,16 @@ bool WriteValue(File f, Class type, DataValue value, int indent)
    {
       WriteArray(f, type, value.p, indent);
    }
-   else if(type.type == normalClass || type.type == noHeadClass || type.type == structClass || type.type == bitClass)
+   else if(type.type == normalClass || type.type == noHeadClass || type.type == structClass)
    {
       _WriteJSONObject(f, type, value.p, indent);
    }
+   else if(type.type == bitClass)
+   {
+      Class dataType;
+      dataType = eSystem_FindClass(__thisModule, type.dataTypeString);
+      WriteNumber(f, dataType, value, indent);
+   }
    else if(type.type == systemClass)
    {
       WriteNumber(f, type, value, indent);