safer memory for reel

This commit is contained in:
Paul Driver 2018-04-29 21:29:25 -07:00
parent 61c3398ad9
commit 35f137453e

View File

@ -7,7 +7,7 @@
_reel_in(u3j_site* sit_u, u3_noun a, u3_noun b) _reel_in(u3j_site* sit_u, u3_noun a, u3_noun b)
{ {
if ( 0 == a ) { if ( 0 == a ) {
return u3k(b); return b;
} }
else if ( c3n == u3du(a) ) { else if ( c3n == u3du(a) ) {
return u3m_bail(c3__exit); return u3m_bail(c3__exit);
@ -29,7 +29,7 @@
u3_noun pro; u3_noun pro;
u3j_site sit_u; u3j_site sit_u;
u3j_gate_prep(&sit_u, b); u3j_gate_prep(&sit_u, b);
pro = _reel_in(&sit_u, a, u3r_at(u3x_sam_3, b)); pro = _reel_in(&sit_u, a, u3k(u3r_at(u3x_sam_3, b)));
u3j_gate_lose(&sit_u); u3j_gate_lose(&sit_u);
return pro; return pro;
} }