luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix serialization of NULL values.

Browse source 
[INTERPRETER]
* BUG: Fix serialization of NULL values.
This commit is contained in:
gambas 2019-12-18 05:46:26 +01:00
parent b8ca134643
commit b98ca797e4
1 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
main/gbx/gbx_stream.c
View file

@ -1306,12 +1306,12 @@ void STREAM_write_type(STREAM *stream, TYPE type, VALUE *value)
}
buffer;
if (VALUE_is_null(value))
/*if (VALUE_is_null(value))
{
buffer._byte = 0;
STREAM_write(stream, &buffer._byte, 1);
return;
}
}*/
if (type == T_VARIANT)
{
@ -1424,7 +1424,12 @@ void STREAM_write_type(STREAM *stream, TYPE type, VALUE *value)
CLASS *class = OBJECT_class(value->_object.object);
void *structure;
if (class->quick_array == CQA_ARRAY || class->is_array_of_struct)
if (!value->_object.object)
{
buffer._byte = 0;
STREAM_write(stream, &buffer._byte, 1);
}
else if (class->quick_array == CQA_ARRAY || class->is_array_of_struct)
{
CARRAY *array = (CARRAY *)value->_object.object;
VALUE temp;