示例#1
0
 public static bool Hunk3Cons(out object answer, object cxr0, object cxr1, object cxr2)
 {
     answer = new Hunk3(cxr0, cxr1, cxr2);
     return(false);
 }
示例#2
0
 public static bool Hunk3Cons(out object answer, object cxr0, object cxr1, object cxr2)
 {
     answer = new Hunk3 (cxr0, cxr1, cxr2);
     return false;
 }
示例#3
0
 public static SCode Make(Hunk3 init)
 {
     object [] cdrArray = (object []) init.Cxr1;
     Symbol name = (Symbol) cdrArray [0];
     Symbol [] formals = new Symbol [cdrArray.Length - 1];
     for (int i = 0; i < formals.Length; i++)
         formals [i] = (Symbol) cdrArray [i + 1];
     uint code = (uint) (int) (init.Cxr2);
     SCode body = EnsureSCode (init.Cxr0);
     return Make (name, formals,
         body, (code >> 8) & 0xFF, code & 0xFF, ((code >> 16) & 0x1) == 0x1);
 }