Right, I'm committing this session because I'm too cold and tired to go on.
It does not at present build (and it's going to take a good bit more work before it does).
This commit is contained in:
parent
f05d1af9d6
commit
6148d3699f
32 changed files with 364 additions and 309 deletions
|
|
@ -85,12 +85,18 @@ struct pso_pointer eval(
|
|||
default:
|
||||
result =
|
||||
make_exception( make_cons
|
||||
( c_string_to_lisp_string
|
||||
( L"Can't yet evaluate things of this type: " ),
|
||||
result ), frame_pointer,
|
||||
make_cons( make_cons
|
||||
( c_string_to_lisp_keyword( L"tag" ),
|
||||
get_tag_string( result ) ), nil ),
|
||||
( frame, c_string_to_lisp_string
|
||||
( frame,
|
||||
L"Can't yet evaluate things of this type: " ),
|
||||
result ), frame_pointer, make_cons( frame,
|
||||
make_cons
|
||||
( frame,
|
||||
c_string_to_lisp_keyword
|
||||
( frame,
|
||||
L"tag" ),
|
||||
get_tag_string
|
||||
( result ) ),
|
||||
nil ),
|
||||
nil );
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue