String-like-things are being created and printed correctly; bind is broken.
This commit is contained in:
parent
cf05e30540
commit
ca5671f613
8 changed files with 508 additions and 450 deletions
|
|
@ -41,7 +41,7 @@ struct pso_pointer search( struct pso_pointer key,
|
|||
|
||||
if ( consp( store ) ) {
|
||||
for ( struct pso_pointer cursor = store;
|
||||
consp( store ) && found == false; cursor = c_cdr( cursor ) ) {
|
||||
consp( cursor ) && found == false; cursor = c_cdr( cursor ) ) {
|
||||
struct pso_pointer pair = c_car( cursor );
|
||||
|
||||
if ( consp( pair ) && c_equal( c_car( pair ), key ) ) {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue