We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 0510257 commit dfb25d7Copy full SHA for dfb25d7
lisp.c
@@ -1375,9 +1375,9 @@ static inline int tracep(lisp f) {
1375
// 3. setq ??? (allow to define?)
1376
inline lisp _setqqbind(lisp* envp, lisp name, lisp v, int create) {
1377
lisp bind = getBind(envp, name, create);
1378
- printf("SETQBIND: found "); princ(name); putchar(' '); princ(bind); terpri();
+ // printf("SETQBIND: found "); princ(name); putchar(' '); princ(bind); terpri();
1379
if (!bind) {
1380
- printf("SETQBIND: "); princ(name); putchar(' '); princ(bind); terpri();
+ //printf("SETQBIND: "); princ(name); putchar(' '); princ(bind); terpri();
1381
bind = cons(name, nil);
1382
*envp = cons(bind, *envp);
1383
}
0 commit comments