suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

call new with explicit GC mode

Browse Source 
svn: r2507
This commit is contained in:
Matthew Flatt 2006-03-25 20:28:05 +00:00
parent 02d0f2d56a
commit 155526c8ae
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/compiler/private/xform.ss
View File

@ -675,12 +675,12 @@
(printf "~n")
;; C++ cupport:
(printf "#define NEW_OBJ(t) new t~n")
(printf "#define NEW_ARRAY(t, array) (new t array)~n")
(printf "#define NEW_OBJ(t) new (UseGC) t~n")
(printf "#define NEW_ARRAY(t, array) (new (UseGC) t array)~n")
(printf "#define NEW_ATOM(t) (new (AtomicGC) t)~n")
(printf "#define NEW_PTR(t) (new t)~n")
(printf "#define NEW_PTR(t) (new (UseGC) t)~n")
(printf "#define NEW_ATOM_ARRAY(t, array) (new (AtomicGC) t array)~n")
(printf "#define NEW_PTR_ARRAY(t, array) (new t* array)~n")
(printf "#define NEW_PTR_ARRAY(t, array) (new (UseGC) t* array)~n")
(printf "#define DELETE(x) (delete x)~n")
(printf "#define DELETE_ARRAY(x) (delete[] x)~n")
(printf (if callee-restore?