Written the constructor for exceptions; in the process, added a
metadata slot as a first class slot of exceptions.
This commit is contained in:
parent
f915a9993f
commit
83537391a6
11 changed files with 85 additions and 20 deletions
|
|
@ -49,7 +49,7 @@ struct pso_pointer initialise_memory( uint32_t node ) {
|
|||
if ( memory_initialised ) {
|
||||
result =
|
||||
make_exception( c_string_to_lisp_string
|
||||
( L"Attenpt to reinitialise memory." ), nil, nil );
|
||||
( L"Attenpt to reinitialise memory." ), nil, nil, nil );
|
||||
} else {
|
||||
for ( uint8_t i = 0; i <= MAX_SIZE_CLASS; i++ ) {
|
||||
freelists[i] = nil;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue