Пример #1
0
        public static Shelisp.Object Feql(L l, Shelisp.Object o1, Shelisp.Object o2)
        {
            if (L.NILP(o1))
                return L.NILP(o2) ? L.Qt : L.Qnil;

            return o1.LispEql (o2) ? L.Qt : L.Qnil;
        }
Пример #2
0
 private static bool compare_eql(Shelisp.Object obj1, Shelisp.Object obj2, long hash1, long hash2)
 {
     return obj1.LispEql (obj2);
 }