public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
 {
     return
         ((rand1 is LexicalVariable) ? Unimplemented() //PrimitiveGeneralCarCdrA0L.Make (rator, rand0, (LexicalVariable) rand1)
         : (rand1 is Quotation) ? PrimitiveGeneralCarCdrL1Q.Make(rator, rand0, (Quotation)rand1)
         : new PrimitiveGeneralCarCdrL1(rator, rand0, rand1));
 }
Пример #2
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, Quotation consequent, LexicalVariable1 alternative)
 {
     return
         new PCondIsObjectEqL1QQx (predicate, consequent, alternative);
 }
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, Argument0 rand1)
 {
     return
          new PrimitivePlusFixnumL1A0 (rator, rand0, rand1);
 }
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, Argument rand1)
 {
     return
          (rand1 is Argument0) ? PrimitivePlusFixnumL1A0.Make (rator, rand0, (Argument0) rand1)
         : (rand1 is Argument1) ? Unimplemented ()
         : new PrimitivePlusFixnumL1A (rator, rand0, rand1);
 }
 protected PrimitivePlusFixnumL1(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
     : base(rator, rand0, rand1)
 {
 }
 protected PrimitivePlusFixnumQL1(Primitive2 rator, Quotation rand0, LexicalVariable1 rand1)
     : base(rator, rand0, rand1)
 {
 }
 protected PrimitiveGeneralCarCdrL1Q(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
     : base(rator, rand0, rand1)
 {
     this.rand1Value = (int)rand1.Quoted;
 }
Пример #8
0
 protected PCondIsSymbolAL1(PrimitiveIsSymbolA predicate, LexicalVariable1 consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
 }
Пример #9
0
 // (a0 l1 l1 l1)
 PCond2A0L1L1L1(PrimitiveCombination2A0L1 predicate, LexicalVariable1 consequent, LexicalVariable1 alternative)
     : base(predicate, consequent, alternative)
 {
 }
Пример #10
0
 public static SCode Make(Primitive2 rator, Quotation rand0, LexicalVariable1 rand1)
 {
     return
         (new PrimitiveIsObjectEqQL1(rator, rand0, rand1));
 }
Пример #11
0
 PrimitiveIsObjectEqQL1(Primitive2 rator, Quotation rand0, LexicalVariable1 rand1)
     : base(rator, rand0, rand1)
 {
 }
Пример #12
0
 protected PrimitiveIsObjectEqL1Q(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
     : base(rator, rand0, rand1)
 {
     this.rand1Value = rand1.Quoted;
 }
Пример #13
0
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
 {
     return
         ((rand1 is Quotation) ? PrimitiveIsObjectEqL1Q.Make(rator, rand0, (Quotation)rand1)
         : Unimplemented());
 }
Пример #14
0
 protected PrimitiveIsObjectEqL1(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
     : base(rator, rand0, rand1)
 {
 }
Пример #15
0
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
 {
     return
         (new PrimitiveIsIntEqL1Q(rator, rand0, rand1));
 }
Пример #16
0
 protected PCondIsObjectEqLQL1(PrimitiveIsObjectEqLQ predicate, LexicalVariable1 consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
 }
Пример #17
0
 PCondIsObjectEqQSLL1(PrimitiveIsObjectEqQ predicate, LexicalVariable consequent, LexicalVariable1 alternative)
     : base(predicate, consequent, alternative)
 {
 }
Пример #18
0
 public static SCode Make(PrimitiveCombination2A0L1 predicate, LexicalVariable1 consequent, LexicalVariable1 alternative)
 {
     return
         new PCond2A0L1L1L1 (predicate, consequent, alternative);
 }
 protected PrimitiveGeneralCarCdrL1(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
     : base(rator, rand0, rand1)
 {
 }
 protected PrimitiveIsFixnumEqualSL1(Primitive2 rator, SCode rand0, LexicalVariable1 rand1)
     : base(rator, rand0, rand1)
 {
 }
Пример #21
0
 protected PrimitiveIsIntEqL1Q(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
     : base(rator, rand0, rand1)
 {
 }
 protected PrimitiveIsFixnumEqualAL1(Primitive2 rator, Argument rand0, LexicalVariable1 rand1)
     : base(rator, rand0, rand1)
 {
 }
Пример #23
0
        public static SCode Make(Primitive2 rator, SCode rand0, LexicalVariable1 rand1)
        {
            return

                new PrimitivePlusFixnumSL1 (rator, rand0, rand1);
        }
 public static SCode Make(Primitive2 rator, Argument rand0, LexicalVariable1 rand1)
 {
     return new PrimitiveIsFixnumEqualAL1 (rator, rand0, rand1);
 }
Пример #25
0
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
 {
     return
         (rand1 is LexicalVariable) ? PrimitivePlusFixnumL1L.Make (rator, rand0, (LexicalVariable) rand1)
         : (rand1 is Quotation) ? PrimitivePlusFixnumL1Q.Make (rator, rand0, (Quotation) rand1)
         : new PrimitivePlusFixnumL1 (rator, rand0, rand1);
 }
Пример #26
0
 protected PrimitiveIsCharEqL1(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
     : base(rator, rand0, rand1)
 {
 }
Пример #27
0
 protected PrimitivePlusFixnumL1A0(Primitive2 rator, LexicalVariable1 rand0, Argument0 rand1)
     : base(rator, rand0, rand1)
 {
 }
Пример #28
0
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
 {
     return
         (rand1 is Quotation) ? PrimitiveIsCharEqL1Q.Make (rator, rand0, (Quotation) rand1)
         : Unimplemented ();
 }
Пример #29
0
 PCondIsObjectEqL1QQx(PrimitiveIsObjectEqL1Q predicate, Quotation consequent, LexicalVariable1 alternative)
     : base(predicate, consequent, alternative)
 {
 }
Пример #30
0
 protected PrimitiveIsCharEqL1Q(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
     : base(rator, rand0, rand1)
 {
     this.rand1Value = (char) rand1.Quoted;
 }
Пример #31
0
 PCondIsObjectEqL1QSx(PrimitiveIsObjectEqL1Q predicate, SCode consequent, LexicalVariable1 alternative)
     : base(predicate, consequent, alternative)
 {
 }
Пример #32
0
 protected PrimitiveIsCharEqQL1(Primitive2 rator, Quotation rand0, LexicalVariable1 rand1)
     : base(rator, rand0, rand1)
 {
 }
Пример #33
0
 public static SCode Make(PrimitiveIsObjectEqLQ predicate, LexicalVariable1 consequent, SCode alternative)
 {
     return
         (alternative is LexicalVariable) ? Unimplemented () :
         (alternative is Quotation) ? Unimplemented () :
         new PCondIsObjectEqLQL1 (predicate, consequent, alternative);
 }
Пример #34
0
 public static SCode Make(Primitive2 rator, Quotation rand0, LexicalVariable1 rand1)
 {
     return
          new PrimitiveIsCharEqQL1 (rator, rand0, rand1);
 }
Пример #35
0
 public static SCode Make(PrimitiveIsObjectEqQ predicate, LexicalVariable consequent, LexicalVariable1 alternative)
 {
     return
         new PCondIsObjectEqQSLL1 (predicate, consequent, alternative);
 }
Пример #36
0
 protected PrimitivePlusFixnumL1L(Primitive2 rator, LexicalVariable1 rand0, LexicalVariable rand1)
     : base(rator, rand0, rand1)
 {
     this.rand1Name = rand1.Name;
     this.rand1Depth = rand1.Depth;
     this.rand1Offset = rand1.Offset;
 }
Пример #37
0
 public static SCode Make(PrimitiveIsSymbolA predicate, LexicalVariable1 consequent, SCode alternative)
 {
     throw new NotImplementedException ();
 }
Пример #38
0
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, LexicalVariable rand1)
 {
     return
          (rand1 is Argument) ? PrimitivePlusFixnumL1A.Make (rator, rand0, (Argument) rand1)
         : (rand1 is LexicalVariable1) ? PrimitivePlusFixnumL1L1.Make (rator, rand0, (LexicalVariable1) rand1)
         : new PrimitivePlusFixnumL1L (rator, rand0, rand1);
 }
Пример #39
0
 protected PrimitivePlusFixnumL1Q(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
     : base(rator, rand0, rand1)
 {
     this.rand1Value = (int) rand1.Quoted;
 }
Пример #40
0
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
 {
     return
           new PrimitivePlusFixnumL1Q (rator, rand0, rand1);
 }
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, Quotation rand1)
 {
     return
         (new PrimitiveGeneralCarCdrL1Q(rator, rand0, (Quotation)rand1));
 }
Пример #42
0
 protected PrimitiveIsCharEqQL1(Primitive2 rator, Quotation rand0, LexicalVariable1 rand1)
     : base(rator, rand0, rand1)
 {
 }