Category:Fexl: Difference between revisions
Content added Content deleted
m (whitespace) |
No edit summary |
||
Line 14: | Line 14: | ||
<lang C>value fexl_S(value f) |
<lang C>value fexl_S(value f) |
||
{ |
{ |
||
if (!f->L->L || !f->L->L->L) return f; |
if (!f->L || !f->L->L || !f->L->L->L) return f; |
||
return A( A(f->L->L->R, f->R), A(f->L->R, f->R) ); |
return A( A(f->L->L->R, f->R), A(f->L->R, f->R) ); |
||
}</lang> |
}</lang> |
||
Line 22: | Line 22: | ||
<lang C>value fexl_char_put(value f) |
<lang C>value fexl_char_put(value f) |
||
{ |
{ |
||
if (!f->L->L) return f; |
if (!f->L || !f->L->L) return f; |
||
value x = f->L->R; |
value x = f->L->R; |
||
if (!arg(type_long,x)) return f; |
if (!arg(type_long,x)) return f; |