Now happy with what's appearing in the oblist. Reader is very broken.
This commit is contained in:
parent
5ec1c926b0
commit
d2efc8ba78
6 changed files with 44 additions and 8 deletions
|
|
@ -41,10 +41,10 @@ struct pso_pointer privileged_keyword_location;
|
|||
struct pso_pointer privileged_keyword_name;
|
||||
|
||||
|
||||
#define load_and_lock(var,val)var = lock_object(c_string_to_lisp_keyword(nil, val))
|
||||
#define load_and_lock(var,val)(var = lock_object(c_string_to_lisp_keyword(frame_pointer, val)))
|
||||
|
||||
|
||||
struct pso_pointer initialise_privileged_keywords(struct pso_pointer env) {
|
||||
struct pso_pointer initialise_privileged_keywords(struct pso_pointer frame_pointer) {
|
||||
load_and_lock(privileged_keyword_bootstrap, PK_BOOTSTRAP);
|
||||
load_and_lock(privileged_keyword_documentation, PK_DOCUMENTATION);
|
||||
load_and_lock(privileged_keyword_location, PK_LOCATION);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue