conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

remove old debug prints

This commit is contained in:
Yuichi Nishiwaki 2013-12-03 13:08:23 +09:00
parent dc7c801c38
commit 4e98d37ab1
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
piclib/built-in.scm
View File

@ -578,8 +578,6 @@
;;; hygienic macros ;;; hygienic macros
(define (walk f obj) (define (walk f obj)
(write obj)
(newline)
(if (pair? obj) (if (pair? obj)
(cons (walk f (car obj)) (walk f (cdr obj))) (cons (walk f (car obj)) (walk f (cdr obj)))
(if (vector? obj) (if (vector? obj)

2
src/gc.c
View File

@ -41,7 +41,9 @@ add_heap_page(pic_state *pic)
struct heap_page *page; struct heap_page *page;
size_t nu; size_t nu;
#if GC_DEBUG
puts("adding heap page!"); puts("adding heap page!");
#endif
nu = (PIC_HEAP_PAGE_SIZE + sizeof(union header) - 1) / sizeof(union header) + 1; nu = (PIC_HEAP_PAGE_SIZE + sizeof(union header) - 1) / sizeof(union header) + 1;