mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-23 20:15:05 +02:00
WIP
This commit is contained in:
parent
3b121a059d
commit
955b58b1a5
2 changed files with 3 additions and 1 deletions
2
TODO
2
TODO
|
@ -15,6 +15,8 @@ Working TODO list:
|
|||
cyclone> (write-char 1)
|
||||
Error:
|
||||
|
||||
This it might be an issue with rt_raise2, perhaps this line:
|
||||
make_cons(c0, &c1, nil);
|
||||
|
||||
- Constructs require for self-hosting
|
||||
|
||||
|
|
|
@ -185,7 +185,7 @@ object Cyc_current_exception_handler() {
|
|||
void Cyc_rt_raise(object err) {
|
||||
make_cons(c2, err, nil);
|
||||
make_cons(c1, boolean_f, &c2);
|
||||
make_cons(c0, &c1, nil);
|
||||
make_cons(c0, &c1, nil); // TODO: seems broken?
|
||||
apply(nil, Cyc_current_exception_handler(), &c0);
|
||||
// Should never get here
|
||||
fprintf(stderr, "Internal error in Cyc_rt_raise\n");
|
||||
|
|
Loading…
Add table
Reference in a new issue