Another inconclusive session: still nothing works, still making progress.

This commit is contained in:
Simon Brooke 2026-04-22 18:16:00 +01:00
parent ef59563e25
commit eed4711fee
35 changed files with 317 additions and 232 deletions

View file

@ -89,7 +89,7 @@ struct pso_pointer c_interned( struct pso_pointer key,
* @return `true` if a pointer the key was found in the store..
*/
bool c_internedp( struct pso_pointer key, struct pso_pointer store ) {
return !nilp( search( key, store, true ) );
return !c_nilp( search( key, store, true ) );
}
/**
@ -149,5 +149,5 @@ struct pso_pointer internedp(
struct pso_pointer store = or( make_frame( 2, frame_pointer,
fetch_arg( frame, 1 ), frame->payload.stack_frame.env));
return c_internedp( key, store );
return c_internedp( key, store ) ? t : nil;
}