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

Major step forward: equal is now working, and consequently so is assoc.

Browse source
This commit is contained in:
Simon Brooke 2026-05-06 16:42:18 +01:00
parent 271b7da46a
commit 5e64a33965
11 changed files with 168 additions and 137 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/c/payloads/exception.c
View file

@ -114,15 +114,15 @@ struct pso_pointer throw_exception_with_cause( struct pso_pointer location,
struct pso_pointer result = nil;
#ifdef DEBUG
debug_print( U"\nERROR: `", DEBUG_ANY, 0 );
debug_print( L"\nERROR: `", DEBUG_ANY, 0 );
debug_print_object( message, DEBUG_ANY, 0 );
debug_print( U"` at `", DEBUG_ANY, 0 );
debug_print( L"` at `", DEBUG_ANY, 0 );
debug_print_object( location, DEBUG_ANY, 0 );
debug_print( U"`\n", DEBUG_ANY, 0 );
debug_print( L"`\n", DEBUG_ANY, 0 );
if ( !c_nilp( cause ) ) {
debug_print( U"\tCaused by: ", DEBUG_ANY, 0 );
debug_print( L"\tCaused by: ", DEBUG_ANY, 0 );
debug_print_object( cause, DEBUG_ANY, 0);
debug_print( U"`\n", DEBUG_ANY, 0 );
debug_print( L"`\n", DEBUG_ANY, 0 );
}
#endif
struct pso2 *cell = pointer_to_object( message );