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

Added bind; but mainly, tactical commit before changinh lisp calling

Browse source 
convention
This commit is contained in:
Simon Brooke 2026-04-01 16:35:06 +01:00
parent 9eb0d3c5a0
commit f3a26bc02e
4 changed files with 75 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/c/payloads/cons.c
View file

@ -33,11 +33,8 @@ struct pso_pointer cons( struct pso_pointer car, struct pso_pointer cdr ) {
struct pso_pointer result = allocate( CONSTAG, 2 );
struct pso2 *object = pointer_to_object( result );
object->payload.cons.car = car;
object->payload.cons.cdr = cdr;
inc_ref( car );
inc_ref( cdr );
object->payload.cons.car = inc_ref( car );
object->payload.cons.cdr = inc_ref( cdr );
return result;
}