public static new SCode Make(Primitive2 rator, SCode rand0, SCode rand1)
 {
     return
         ((rand0 is Argument) ? PrimitiveLessThanFixnumA.Make(rator, (Argument)rand0, rand1) :
          (rand0 is StaticVariable) ? PrimitiveLessThanFixnumS.Make(rator, (StaticVariable)rand0, rand1) :
          (rand1 is Quotation) ? PrimitiveLessThanFixnumXQ.Make(rator, rand0, (Quotation)rand1) :
          new PrimitiveLessThanFixnum(rator, rand0, rand1));
 }
 public static SCode Make(PrimitiveLessThanFixnumXQ predicate, Quotation consequent, SCode alternative)
 {
     return
         new PCondLessThanFixnumXQQ (predicate, consequent, alternative);
 }
 protected PCondLessThanFixnumXQQ(PrimitiveLessThanFixnumXQ predicate, Quotation consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.consequentValue = consequent.Quoted;
 }
 public static SCode Make(PrimitiveLessThanFixnumXQ predicate, SCode consequent, SCode alternative)
 {
     return
         (consequent is Quotation) ? PCondLessThanFixnumXQQ.Make (predicate, (Quotation) consequent, alternative) :
         new PCondLessThanFixnumXQ (predicate, consequent, alternative);
 }
 protected PCondLessThanFixnumXQ(PrimitiveLessThanFixnumXQ predicate, SCode consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.rand1Value = predicate.rand1Value;
 }
Пример #6
0
 public static SCode Make(PrimitiveLessThanFixnumXQ predicate, Quotation consequent, SCode alternative)
 {
     return
         (new PCondLessThanFixnumXQQ(predicate, consequent, alternative));
 }
Пример #7
0
 protected PCondLessThanFixnumXQQ(PrimitiveLessThanFixnumXQ predicate, Quotation consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.consequentValue = consequent.Quoted;
 }
Пример #8
0
 public static SCode Make(PrimitiveLessThanFixnumXQ predicate, SCode consequent, SCode alternative)
 {
     return
         ((consequent is Quotation) ? PCondLessThanFixnumXQQ.Make(predicate, (Quotation)consequent, alternative) :
          new PCondLessThanFixnumXQ(predicate, consequent, alternative));
 }
Пример #9
0
 protected PCondLessThanFixnumXQ(PrimitiveLessThanFixnumXQ predicate, SCode consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.rand1Value = predicate.rand1Value;
 }