Parent Directory | Revision Log | Patch
revision 1.9 by camm, Wed Sep 7 02:57:37 2005 UTC | revision 1.10 by camm, Thu Oct 6 20:30:08 2005 UTC | |
---|---|---|
# | Line 149 FFN(Ffunction)(object form) | Line 149 FFN(Ffunction)(object form) |
149 | vs_base = vs_top; | vs_base = vs_top; |
150 | vs_push(MMcaddr(fd)); | vs_push(MMcaddr(fd)); |
151 | } | } |
152 | } else if (type_of(fun) == t_cons && MMcar(fun) == sLlambda) { | } else if (consp(fun) && MMcar(fun) == sLlambda) { |
153 | vs_base = vs_top; | vs_base = vs_top; |
154 | vs_push(MMcdr(fun)); | vs_push(MMcdr(fun)); |
155 | vs_base[0] = MMcons(lex_env[2], vs_base[0]); | vs_base[0] = MMcons(lex_env[2], vs_base[0]); |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |