From e20576a4440ba79056289dd995cbc77ee87c4883 Mon Sep 17 00:00:00 2001 From: Abdulaziz Ghuloum Date: Thu, 30 Aug 2007 21:58:24 -0400 Subject: [PATCH] * Added a pcb field "collect_key" that simply gets set to #f when garbage collection occurs. --- bin/ikarus | Bin 67788 -> 67788 bytes bin/ikarus-collect.c | 1 + bin/ikarus.h | 1 + 3 files changed, 2 insertions(+) diff --git a/bin/ikarus b/bin/ikarus index 0c1a8eefaf65d7e41492106bb5725e2f8787de69..d6e8b9a08e8ea4a85bd434c40c738c87702593eb 100755 GIT binary patch delta 10758 zcmai43s_Xu_CI^T#2On^1{7fcMUjVyiVqa!Aukn7QossdMX6m&uc4BnJca>}$1z}O zT6uk<`N%RyOf(gcL<86w@<;4WQ*c zdqdTRo>q2-`t^!s7Mj~@i$M&Agk|pUt*xT7zwActp3B({D)+nziTvLFI@fn-SMO1< z{oK}>ch5Eu-68*mQHzvvVYSpuT(tayodJ?^D&o*GloJvgU-bbQgIQj_8#8r zsRvMAFQqj|u{mP4zYCwJ80jyIbjjN^A-h%(Ky}voVZ8EOBcQIa;4s%k?PwwKK;1zPs5BeIrd*G)v-|M-xFYsaG8^!y9 zx5TsyaIH%{<^g_zJMPUI?)XNQcsH;Gwo9q%OtApG_Z9U1b&lUc8~FJ&V{)W4x#nBF zn07I+QH=58gWV@zpI%Q4ftb^Z%YkSW99#huM{F5DO5V!gP+MSZbX{?Xc+ zCSFgUV!q)jzxEzqR~IqdU+!8h2++}$***i&T<7}CjOnN3k57U@@yFLdJPNJmw<{Fn zESWz6t0z88e#0r>h|3>Z1;5K;4dd{-K#abfx zs-B-n4ZgjYmA?1wGy6rbTB;X6ZY>sExm8}z@CnIIAggA10I6n;Y%?nfv^KN8J>f8` zRXzd?t1zsaob@hLn77hAKU3iD9qP#MpkInt!Wmt7Y12~2Hx;-K___IAS2beVf;?8$ zs7xhNmiNQPV_&7q%yZRv+&&2;(>JQ>T+HyVLu9`glx$7PzbH z(I|9^jpn-SXW*>}`mxU(-IK?O1$mEIv|Y99)Q9bUSq<#)%kXzFQ)HS(b5m#YU7f*F z#st9{tK)OA)Be7mzGI=AU2JVCEiLT_I2QdI(KzO9E&2KTco%`POrtLB(91bq07n4J z4{GJx7giBc%rpm=)O?d9%T6x738D)PbJL?@@5~>${G@Xd+9b$ASZf`=G~sw{`JF`RhZD$=w1{z46Oi4r9lFug%!w zG&k5QuM0>=m=23O7mF*I+gY@2;*B-n2P8HsB5Nntg{kB~yTh(1KBii$Sj`_je6R?W zU)dZ6U__BJ51o9JI)wyx=Q@N7Z1N7MeN!E-!PY(;0Xw#56w;_4Bri zuL6V-VuFWMvd)2fOC=i}*hebCx~M#TrIM`<93YicIB>93vYWmh=+iISsc?--oPG-S z;((FzOFIzEH(ca7)F(8+Yx+U%z+W-+SzIM8vH7d#M<0JF#OGky9^wXkv(Z;5y1H-5s~{hA;3Qi`h-6HcFo2BalhKF>Ca zHPR?4)>({6mSQH00I8FkcXN+Gk$mR{*U`LD83GoC$m_RqD_wYANeWkYyqMM`HrB{` zDebaUUPOt5cz!7u6p)w0tqtI2C|DKGKeWnh%IY4lQN>kMyJHMh?XUKafEnAlRITOYbffB;Dq5k+sl5?lOfhv zstrYtf^0T-$8dTs?J6b4i80PnVv-o+B0iBMbr$2B0vnx5_%e+_^cz<8mNt~)WgwcX zxt1x!ykA6xD3+|Dm0^LQ+;=M_9a0i^UShJ8s5mcUvV;tEPrM~t;W}XMmyB@wGR)68 zT3i}O_rrYhZv680o1h0rNEBZiA2_w%sHT_tlCa?6=-9KJ|KU+8canUq$hTezJpvSnTOIRgH3r) zXuMG!cpp)Dl|vvzJ^*gmz}HhAh#rIocfAQ2rNG>RPTs?hTkU^myecb?aBx?(3PQ9X zPePO;jKtXJ`q(&55p|senmgq2to3&Eq+Awbrq;(y<2_a^5&BbI#8iDJ!53r3xN<)V z&VoD_%vSiwS%_#c6y_iR23IR;Cqspl8ZE_4jlk)|%MR;mp+y?#{f2N~< z4Nc69vleoG`$5z-gU>eW#6~g6**e)ptcm#N(p&adK$bt>2i;1}_#Q}&qBG?RLKNMA zg>6yvJ{TNPR6@(b`+3j%0n@5Sx=`}RPCm&F`QyXz06)G5di-zp*vppzrpcYid03$L zzrXLO$K!wX4E_J~ELAi#zuBIJj8rkKpJx=OpBC@&x~fH9&h2f{_S<*EBJgeGJ$wN3 zp@iZ1D1xc((vbh!tMa)F{Zcxyhvi-B-vG0t+Zw~cdu2lbCMp?->w+|K5a9667b(34}L*hwlMvkmo9_}CRJ zfDVow$G)T6W7C)`B}bXra%zk+xzFS}F{=?<+l_g!g`A@Ub-x>EP_&61qe;=;x}Ueu zOVLvxR1DKWX{%1sqr2W zKJb`*I43G~uz|k@;8pcu!Hou_965M37GVYd22zqSzoytn+u}pmxAbZJvuqpf4mut?1hKA9m9a2UC;Bg)jWj@ zD6uvNWnWti+}Y4>+BsnPG9IdY3sAfKXvjC8kdLd~d9d~TU;6*X`?tuO+r$s5-59!_ zcNM|%wt*j7DZkAvgx+ij!dpt^I~v##&LQ&kV)S601i=U+x#RKI+ud=EyeF90 z3W}UCCuy*@l7%?l9d%UA10BDFvzo6KsJeJuJlTN(Ryfx@aFL2^H!bSaE>ZJ@z%IXW zei+=1ye9^-G)kQ4*X6oKJ5GO}Xre30F6?#MIMLMQrbb^tCnuUx?rCpHC~xdFJZdon ze8s=%8&VW19_k(cuW`D>x>xNJReb zOj&}PkkwNHbeEgxKw2+qn9>!5ucr7w{{ECY7D^|lF40Z;^#`SHT zRCt$RUeV$7OUBczz?M9%H#3gG9u{jQYb5rrRG=}~a-T9X-IkB&+;h*FEc3N(z4Hr2 z(Rzhd)s+-ZZqIzJ8(RlX4|*&!!x;OyqVKrERHEoh3g59blNkq||DTZ{zGnJf7DFRu z*pZk0W}akqbaiGA7H<1(=9|oDJohk>irL5D=ULCrH(vbYVf|O1{gFLS4bQ!3eEDPa z*GvCp@x-hHY#9BK^`dd?*@ww5fBrzfSI?j)K3}R-=25K8LtOg@JczZ|^R>T9lVA8q z*SiXH&wAt#-wXa!FbBrd`Z@365W|g9*Yz>49Y6V^<+=puoE4`(H zQaUl$y;muEM5X_~ZN52I);)7r8EH2kDT`uWtJgk4qOP?8sSEJ|je_LdJIhB1xU%otvy+Qs9Lb@%^Mt&@G zq`63WKFwaxfaMHb7{*?<&0NTIIA~@s${l_`6O0AeL`XW_r(;-Qyzro8|d&Z(K8 zI<#ftx}e7^gV+=r_sUD`I=%nOJe;q+vtMFeZDRJ9PGerq;2Tyi>4Iam?{D?P&QB`m zJ{^eG;lobC4f*Sw4iT|%4ZW2U(nCto*T;nMTUKkO7gB{-SwW3CZh1(&E9QU`7abNi zz7cA%fkaDBZgV-mImo}?YAD*_hK0i&YLxkIl%Z&^_GU2OH5iJboYX!i^Ia#yx@yDW zYSB{1f3G<$R(e5=HI^xMaAnejB++^Xo%OLvcon2UmCB%%4WLQI`5^J{1B)9^X0P)v z2^4nX`bOS6$xB)iPSUH(2Y!gq8Y6TT1VfQicMc!n@G7htBXr_$PY+zn-l-K@43^n6 zblIR6Dxg5V_#3pOyGa)1?a&pNnBXR*XKI8U3L#TUpQRDX6~Zhj-B%+NCvGSg$VtL6$SZuOymI8N(b}kHk#G$dU4+t{~gC8r%=gWnXy{w4J3e(s=`k~O$GrVn8 z+txFp(O_Le1?G76KGmE1dWDPDY(ANEuQp!M;`%2jYm017MIMYr+j?6DFgB9niia|1 z$|;U!J*cX97ONu9lAOK~>-mHYmi~ygdJDhqRVJOLua6zcQGIMARhA6uR=NTG@HfwH zyy7UK-%5h=Moj|;Uj_WL#$V(M@i<75Wh4{@BS)s_oeEH;38M0p*7Fal;Ptt9I+d;C zbmciFD%Kzv*4{?~9T*L$awGV~0?s5^q7`+kuos*Pw{kJ%Ddj2IJ2!bYqmtEqT@T;o zEAp!rhW6cbboB$LaQgx}Ci$un6m7dIjbJKvB9k@g**K*RijC$Ap({uJI3f6AzA1X8 zP(<}swFjYr%%-!3hlz`vMX)Z5v(Lv_Q*YrLjIX4mZnb624kD72gZMn1v99dG;};*< z%}w;g+9%ZUS5U>;Dixlf=Uyve*|z4_(pX-&{Re#H%k`6>LfNSQ22vAzahif~`LGvR zw5@L21qMgqmCKoxZ=PLXZa%N#XF2`|2f%duI(+p5;KtKUTI?z%jKrnK==8{?o?<#6 zljvkwK#z(|@B}VHKq^)8MS3LND;th%5muhd`qTdMIqU=(X*fP{k|`NqwQrC&TSp&I zD%(q4);-U%Yzx-u7)z%`>npK22fSX!Lg?u0FY3OZNGG>@8*fLzPWb#XGPA?>9kyv3 zhB7vS)@%%7Ui87nIQB2w9~%ej@ZA~u)-;w(C2wW03-rxfyI2YpZ(4#X=g&$!Ps{wO#2WEG=zNJskOQ86* zMAWbR4Hwn?=hzcmy0T4)Ul@wZx`{Tt9zEQ49eV_z`|(9 z-es)PX4;p}5F}gPxvryO^xhtCV~M{inTs`Ytn)ZJvfo#Czrgm@{*Q4Tr!p?k7&F7# z8T-=3_og7kLJmwuB&|5GgB`T_y+4DYbjd&H&Gysgg9+>>x_e zGUvno9`iB1E7MzeK;isVDj+NY_&yB7)ls+Op7isFezA|R^I0v_d^u$o*l>C z0)FoXJO3)|f>O_#)Tut^cMoX1WpFh+b*Hb7hw4uMow}X$(p~C9gH9T$^@OXgK%uaF zT6n^rjivP`hUr{XCS4m7J4LQ1z40v&dNNSAd?AHan{;dZXi{~cE=+wJ=tpl<4`AQZ z&681V7Y(fTVFxLtI*2`^;3>4RI*@gv+Uj*CB?W>1}En*TD|Q*^v`hPUi61-Hvsf@ZIFl{H?rh*K6l3Oqq*iK5w^Mt0)cGn>2{`+8Sg z!aY3NA+!(C>d+d{E}&hed5yitdwnGc{%9d+;b@U)acIeCQ_(Wfve4$EWuxVy6``#` zTZgs@tpe>G+m*)WSTDEBg3uGq3(XhJA8i0yh;7X0KYMp={6-Mw=>);#l#jowif9?# z%RE64DjySs$5EC>Hwi*5$CyAoSzByuwk_tD9*nh6+O58Mi-!rqe>$UjMR)2d{Lz($ z4{d{foL-zhFiH^iYPbyfp<2TxB!Mq9JZrEZJfg{7K^-$%qp!n(vs|MKvjkxZFPfoq zDLzK7IH82*FK^JFw>-Lbj}?UPHL-B=`;SN7{&*OqQG9^A;*90|GZNtp4If6D7^LB{ zIQUw_yT=N`L=D@K1kyEJjtuRl88jM3%+L&~!};^F#&Zq&3!H^KWw0ag&>F4dE6j43 zi)zHmcLiaxh8u8UJyXMb&j`Xo4ga(ciZpDj5QH)fzg{m0TQwYaKoH*3@Pm)xT@C;3 zXr3T6YA<;^1Yx~q#CoLb9U5ksWtE0KfdA;C8uwa*AbhFOUx_$=s) zH5_#wS3Vl<1N^3j&q2@I8a9Ieu!b*T0(o`X%UryCpX-81_R)U zKQ(#?40;Ul&nK`Q6X>borJ(oIa0ci@G<*~Irs|bE;mBS=c%ZpxbTu}S=H8{J1;Jax zhYw+=X!vKiF;c@%?M47qTO0j3x_5gDd%>1+r^MB1NLbj0e|2WR{U6)WO_Trt delta 10840 zcmai4d0bW1_CNcAii%xSCXrD=WDqZofS`a(DG;a^$V9C)ZLoX>ii$E^uW&qGLzh!# z4ryjKNL~lb35X^^Tpq`)4?~i@`?zPuid+oK?UVEL5 zP3s+-);m^JvzYboOz0W=i69g>3qtJrd*game7!(H+A3FP_26)YohD! z(^vz=cto%?deY-DmPbt<;jDn}d5m;hbxaVXWM`;yl8jE`v_MCTsfiLiqnR@;_Z-OP z(H2h&J4QhR5+N~vz)pQ(7$nT|e`{|S9Rua=llLIDn!>!dutoHqcLX~_x4g6Qo8&Xb<-y|U5A@~E3fii!~(G((21{7j1836(iI=yk|p(m0IH)l4hyb;U&?3_mljCLH|koP#pG)tjp9;o z$#`3I4U}*Hp{UDfk`ju#stbf7i{p67*n&knHDVI@Rp3iDT}o~fSC>M@)DS;&R{nc+vb&fpOGis-yRR2}l8*WMl)PNWz1z(0hP1&% zDO+6-oXqE0jKRMy#|w(M`YLk~A?p-F&C8hpEAduU9N|7FRf_9oq?*W)!dIOf}tbk(VCi8|oyE3Y7cT z3IcTWVb)6^ni^alnVJ8d+(u<_L-kCLD_E?b%f}K z{~)%I^a1XZdP0e6nGcX^*`N-~GC}LGOg?S5tX)1048t(9tDMPaHtnP50(@s~*rQHy z2;)++63Q4tr$ft8ewwo)hzkp6v!qnWU6Ha{ul=Q{W$#F9$9pLZv~5V6_RQ1A%0a00arny1SH=;l+7evw9dwsTD3okQ7y!E8EyOG>gZmV#E}2_?2` zIN3EkB5a>=%L*^Xd_3+=z?txkYp;t z>eRhX3UubdM-K%(P_lKm>aT0>cKYiLV7tG@9ZH*;v%?khhniU07Ru?Pk^`>&giohM36-706 zzbCh}2G-r>7o4*=jlK+aVN>Xb;1pf&8X7xv0!yMLLx=kMy#~E2oZv{P5#)2Y6tOyf z#Ues4(y5_gC5JfeEDnM}p2+V^<U*4mXI)Aw`0^0;vZJD-9B$Acsu4zMn_GX z?eaii$y9ojAJu>=&W}ZLqMhMu*k=#DMU)Zhr(;Ly*-#($A*~Jd9en2{Rpe!`*+u54 zB5J<>X)k>gI++=1Kv?jcVHh#pZ7;km-#Bb{lK`6Prf;||_{|VNb;fj-# z8{&x?*4?%Y>*jZe2RLh(4xX3~3YVn)X+Bf7XlAX3tlg{(KBZdCSWL(6KUb>Cubdbk zV60qS#+%eXJggsAp_~uJ5Xt0tn6kosh92IgI^i>G=WM%y?S6|yew9q3m9|Fu^vu?n zH_?gkfowMYCp^++&<|M6LdQlP3WAtAn>>fby1GJxC3!#h2$sM{WG|XOY}|vZ0AYog z;vrR3+3`TBVxt}VNfle|c(7D~T~+ymrHWm4941xlr5nTif?^%YD^+6tdoY-vQag1w(U#2t7WQ=j9U%7r!+*-A3K@eX|v>66Z9)F>{ml#ExT#3D`^0!rB%-#`oU2{c_1lTpYh$J2JST3d`VQzLQ^5`&}{ zGg=T>mQhT~jTM_6Qsc?h;Qz=7FpG8OTK%eCxKd1}!BFYUIb5XFcrn3IN=*_IoWzHc zq#j~&OGvXr1>c7_gt30*Kxqr#gJEbcrh29jOMVm;qF7N$FBn21xN}xYI^-hmozyfb zRq;-4x`fnpPrN1XxWOyNYkcjw2Kv?z;20||iKpI?ekBgASa$NY*49B;qt5Ch7EkrWTos$zQSEU5UHWe z#9#;?;g_uTuOqt3?qbV>Rjq;$FUSug3=t|~Vr*k#Jg11dZUQYG@j#z_HjHFk5fic+ z6QXVOZjf*TQkTP28t~!eumqY#~E>cSRA85izx41CQfhb&9B;E=$UKX=Zjklm0 zZxPdq>*ihqx+YeZ^2K1zgxF#HSYXR7uH{lfJZ&5qpwB{AydX_6D70zRFmed%My(@L zXT)2|IlJu$>XFEEtvaz;OmnnkIf-@A|6X#-wismj+c%(EIo7`dsc~>>gFO!ZfOQ>l z@IDyqaqtqY8x`cU;yZ*>#}Pj+qu1q#H;)Pq;8EQFe-HQpdq55#&(R@1KYZI&PuTzJ z8TtR|krWNB+d30PAF3H0tO>IMuc5 z${O|9q_PcTBiJ+=J~qYY#5L6$&Pw9^h0m#a)tM*G4P%EUaZ~S`IA62-b(*51b&EEY zKTl+-JW`M=c$}n8qd&)nv-c@1$`Etu8@?>@9;!YZk-mJwTRc;z8Z3@gmMR`Y(aq2I z!Tp8fW~z0Ju3z$#xFo9)N;XABvpaM?YK^yv*HOwBHNVdgTJ3TnNJvBSd@76{%`)kY zXkWKw>p;VyT(z&$CzI*R=+U8X^AV*!$b?*n^Srw--g*^tm@+9Y#&_fzO%bQroqHS@ zpY+O;hQ;(TI9fN_BcfOyYh4#ZY`{T_eV!M<-Z9SudnqQ?7ta|F$G*Z=(C@KNvNiNX z+ywRs?Tg#Z_EXyU6)cp_j-SZBrCt+^ERbeTFzH@+m7-F8+;h27ENk+vPHXz@BG34c zc)q*17 zmSz1h&iRmhP=b%trk{>G%kGQ-a!Odro~81HXm*NDCLCcaX;I>%%$qJIRx+aeiPIC8 z+}{_xvb3woFH`x!R$tG+48af z{Gq~P`i6HidH0t7bUh@s&GEqI*v4?WQbYIP-C%Up?JB#`gmuY-*I>U_aK9+|oIh!t zp(DxR2)VD5A7if|vWf$iK7n=Fc&!Wad>jr?MC6-BhoVIuOD1yxCD1!HW47L1eisKMiA!e^D?J3R+Lg7u0bKUkB>c z|2QAsDIe+>KC2F6>N9+3m1J5@uci48-pLJtcqPW+C#5WY2-tpP!sRbWPV?3|ccbnP zP7htp)nEnuN=nB&7Ph||NT@L|x070CIq`S53R?5vcot0O9!v^+vDCiU(ctYkZG$#< zZp~eaoaD<2DQnWao*~-SZKm2uu6;f&Q-%4)KS5U~x%FhLRg-U0`=pSbH~Bag5JZua zL-6kQ$mDzijD`n!pUs zR;RM@tTq%}@)6RfyANR8P-PQ8Lh;hEu3j5ye0o@LA8i@e2wc4UZN$5q?Vp{R{JEx4 zRFytV*L@?MNgq*Sv(E_;TOEILH^gN4a|qmOk1o=`ih#f zy=khkKgjcpeqgCE2D5+CL1VCQ9zHmDF>7k@$M><#8wT2g?-}`&^|mpQvD-8@H;27U z>vFUE9s4)73=hN&Qu$qm)x{g=$K2^`t~EVxAafgz(=FCZmROu$sZ3+A7C-F9bT7V7 zA3grKulX76Xm9yMQM5^6RduBq$n}vgbx{rA^q}4|a@|IKtmr$XFjXk}(hPf+%wTSQ z7yf4^h_B5*z=CM(OdIP(0kh8FOZw`p{>)(gdDb@O*5jl5iR^v!1Y9xuv1i;q{OA3~ zuRiu)HjA1bf68t4hZt{^{$}yyIn``9{XXX@H^aI6$uFN<9rW}E7)dUbjwtI`t*t{` z_d7g@2;iYFe@R0+mWozm5eD?usF(NACf4BMOd|78as?4;X&y+(6Pw|?Xtu^hLIW%Ub2fg=9qnmTx{Wx|mIPW&J79(f>Zj~5? zaGfPxSfcj%u6{NKNE^6UhoN=(Y?SaAznRk^B9>RuOGV)`Ef#NN5Ye(9FW>yD$Ww={ z#(@WyAUY#M&jUN;j<|AbQw*ZnlY`Ct?VQ`;odV14cy?#{; zMK1NsGxCrnJ@^GJ$v@kkR$Qc5xZN-?|gytcU%qo^;%P0f5L z(_30>pzTYS53?eS;)EW8pkMWCUkv_@!QG)0^`sY1!~6`1)kq z&(M3c+8>3D*c^3c=osqfeLl zvG?fSvhlrUi$^a0j_KlOTN9S|W9&1URvhYYZh#%O_xXT1od4pnhkKh>ehAlxX-DxS zmQ1$dN4qMRwqiD8OX>!ew-iasduWvTRC$z-pF?d|ROBh1xC zb0ByW7pqJDkkU(I@K=nA(qOii4wn7{?@j?_&-%_5Kh)G5;(60NA7bLK8fhoJRp!ec zqo%S^D5qGtJ48LpBf2Z5Kx6qJ5S}X!b4uV_C#^4~SIdp;Rr;;m>}F8+vtuWtoAnlv zw&GK`p1w2<9$*kH1$-Gf-u8`m`2*c`rBx^nk@@4Mop&&`- zD1>GhGG2zWL)k_yqWnsm_=j8Aregd$tgqs9Fwg`U6i$Ea4&T}bhpxqHD0~A z3oMD~R?+S?gI!MEg)_~!wHUI!Ll@Wl>0q!G(Iv@W-Tvv;-=wij#Xb~eNh^t0YMsPb z?ql~2IQXXpe=H@#S*ZkhUH&>Y7zs#c8D$U`IpTpuTo!M82A4vkaylGggQT95)p(s! zi4L8_e}E`$5?~bn%jc%w0n~d%+$8+bPVJUQd-BM{M|`)d^yIpSRO7bL>2=3dc$rqb zP{Gz&yHy!kiNV%}M+Et5CMH#m;Lkv6l77mlAUs1KKoaaI+-kvKFQPVcX62J-4VYUm zs5ph=_mRZ&ZExdM0RWGlu2P|klrjpBD&umZmUxLdfJ~xK*9Z5n-VQh6u>~aM6I#rP zqW&Ak;G&zfp%|BTs|@HyvSzDRJ|9mO>XdKcy4WDSnHO+wExBkBz#M*14ur)jMTBWDea{^yx{MCDVKdr_g>n^a%k7~#k$ZW{`&0}GeTA7JF!#Q zb(-|@E37BoeEB7oNaBtNRzo#A2D3eMWyc_0-^2|&$FX-Qc4q>Mpp`rQ**4m_(>L*3 zyz+CiHph2r$_M7(6c$rGA5{wKZ3$iWWqKE81GVoQ6!8-%0d3KZD}TmQHUF#1X`By1 zzG5eT+4`ORrhP^(riXSdVxy>jR}1pWp55o!YxMjpb95IcD4t4+P)*8@>oh5ldhZEm z4c4eVl?;Vk-QEoL9qC`)$KtI=U!B6(P3rmDpF!V;*v)-xTo-dAqB<2hMp5{FfA+dH zWB)Rydu$x-ddtVHSExGUf-#+pqv*HSmthAMA4p-*bn3t|cG?>CMk&J|eU86*oxMdn z-|`)64papRc);WDQ3xn0-zreVQ$dk2#1(briNojw|_a}K2&N55wS>GNa!0&=Oj zfWH%dT@%GVr-8?V*bz!NKAx3P>G7vnZ)@xEOvX-9%!yHKJ3V(Ilj}GU%v|W(6Weeo z%1#dPSdGPfk>AGeU0l1!vd%o#z<1K1>+w9bos2=D{liHwNyHyQd=9d3xrw5BrIdPY=N>5y#tT&FMf~)CW(G zW_=ZkHy_nCEu;mfy;&=zoe5#9=+qfM-M#>tUmL=A`ivhWzQDi_)T4HS?%;ED`iw9B z*Ur4!P~9A*qg&ulU!EDtyy!~p#)qaqfQ1!0b^Mv@<3896<;)y{w>xs#5p;0zs@F6A zKq9Ry!VPWWZ$)BVoei(h*YKHSIz;t#OT0%wr=kP@wFH%656IfL>kBg0r^WTMGvIX^ zA+^Ux5XKd@=*z=!D|T3tXlFA0#gfJJS^Z4kZ|!E{of~`N1P%5nzVsHX#`nz5y0!`Q zXt%s>{3z#rCJky?9Wi(8*dFRSuk1< ze&VGqhO_b2)UM%ey9FT}_aLYHO%Q|w8eTmX%ha$ta>XYao*pR(-8I>BdDse#UW(gk zxkeXe3&K=hJ45H=`8XC1sHAy^=#N_-eORI(e5;8?P{29jifPL!z+^TpE5MOZM+~%*02pZAxFb&k@oyP;cR#YXM=#(K-f0$u2;Kp{`!Bdx!!f`QYWVq&;9d=X z1OB-hJ_vfDhJ!BPtw+O7z}qxzg`U?m{2Pous^K%hB@J396P-^q{4~wT2G^KdC8AhQI=iUW)xL((s8`G$jwg#T!xOQ1p4@NXz7VsxrienWAvwb>t}dv~U?bZf>h6)p~u(a~G}(}Vr| Ee_T;?KmY&$ diff --git a/bin/ikarus-collect.c b/bin/ikarus-collect.c index feccf90..d95a8fc 100644 --- a/bin/ikarus-collect.c +++ b/bin/ikarus-collect.c @@ -381,6 +381,7 @@ ik_collect(int mem_req, ikpcb* pcb){ gettimeofday(&rt0, 0); getrusage(RUSAGE_SELF, &t0); + pcb->collect_key = false_object; gc_t gc; bzero(&gc, sizeof(gc_t)); gc.pcb = pcb; diff --git a/bin/ikarus.h b/bin/ikarus.h index e2dc9be..474ffea 100644 --- a/bin/ikarus.h +++ b/bin/ikarus.h @@ -120,6 +120,7 @@ typedef struct ikpcb{ int engine_counter; /* offset = 36 */ int interrupted; /* offset = 40 */ ikp base_rtd; /* offset = 44 */ + ikp collect_key; /* offset = 48 */ /* the rest are not used by any scheme code */ /* they only support the runtime system (gc, etc.) */ unsigned int* segment_vector;