simon/post-scarcity
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

check_tag now works for vectorspace as well as consspace tags

Browse source 
All tests except bignum boundary tests still pass.
This commit is contained in:
Simon Brooke 2021-08-05 23:35:21 +01:00
parent 492460f37e
commit 6f54b92d32
No known key found for this signature in database
GPG key ID: A7A4F18D1D4DF987
1 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/memory/consspaceobject.c
View file

@ -37,14 +37,14 @@ bool check_tag( struct cons_pointer pointer, char *tag ) {
result = strncmp( &cell.tag.bytes[0], tag, TAGLENGTH ) == 0; result = strncmp( &cell.tag.bytes[0], tag, TAGLENGTH ) == 0;
if ( !result ) { if ( result == false ) {
// if ( vectorpointp( pointer ) ) { <<< this line blows up! if ( strncmp( &cell.tag.bytes, VECTORPOINTTAG, TAGLENGTH ) == 0 ) {
// // struct vector_space_object *vec = pointer_to_vso( pointer ); struct vector_space_object *vec = pointer_to_vso( pointer );
// // if ( vec != NULL ) { if ( vec != NULL ) {
// // result = strncmp( &vec->header.tag.bytes[0], tag, TAGLENGTH ) == 0; result = strncmp( &vec->header.tag.bytes[0], tag, TAGLENGTH ) == 0;
// // } }
// } }
} }
return result; return result;