comment out debugging codes.

This commit is contained in:
Vitor Santos Costa 2012-01-09 23:27:22 +00:00
parent 73fe640af3
commit f632bc72bc

View File

@ -51,17 +51,18 @@ PL_is_blob(term_t t, PL_blob_t **type)
return TRUE;
}
void check_chain(void);
void check_chain(void) {
AtomEntry *ae, *old;
ae = SWI_Blobs;
old = NULL;
while (ae) {
old = ae;
ae = RepAtom(ae->NextOfAE);
}
}
/* void check_chain(void); */
/* void check_chain(void) { */
/* AtomEntry *ae, *old; */
/* ae = SWI_Blobs; */
/* old = NULL; */
/* while (ae) { */
/* old = ae; */
/* ae = RepAtom(ae->NextOfAE); */
/* } */
/* } */
static AtomEntry *
lookupBlob(void *blob, size_t len, PL_blob_t *type)