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

Right, I have finally undone the issue #18 change. It was a nice idea,

Browse source 
but I have not made it work.
This commit is contained in:
Simon Brooke 2026-05-06 15:32:35 +01:00
parent c29a95b00d
commit 271b7da46a
10 changed files with 36 additions and 28 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/c/environment/function_bindings.c
View file

@ -59,7 +59,7 @@
*/
struct pso_pointer
bind_function(struct pso_pointer frame_pointer, char32_t *name, char32_t *doc,
bind_function(struct pso_pointer frame_pointer, wchar_t *name, wchar_t *doc,
struct pso_pointer (*executable)(struct pso_pointer)) {
struct pso_pointer result = fetch_env(frame_pointer);
struct pso_pointer n = c_string_to_lisp_symbol(frame_pointer, name);
@ -94,7 +94,7 @@ bind_function(struct pso_pointer frame_pointer, char32_t *name, char32_t *doc,
* this `name` in the `oblist`.
*/
struct pso_pointer
bind_special(struct pso_pointer frame_pointer, char32_t *name, char32_t *doc,
bind_special(struct pso_pointer frame_pointer, wchar_t *name, wchar_t *doc,
struct pso_pointer (*executable)(struct pso_pointer)) {
struct pso_pointer result = fetch_env(frame_pointer);
struct pso_pointer n = c_string_to_lisp_symbol(frame_pointer, name);
@ -125,8 +125,8 @@ bind_special(struct pso_pointer frame_pointer, char32_t *name, char32_t *doc,
}
struct function_data {
char32_t *name;
char32_t *documentation;
wchar_t *name;
wchar_t *documentation;
void *executable;
};