Exemplo n.º 1
0
 public static SCode Make(PrimitiveIsFixnumEqualA0L predicate, Argument consequent, SCode alternative)
 {
     return
         (consequent is Argument0) ? Unimplemented():
         (consequent is Argument1) ? PCondIsFixnumEqualA0LA1.Make (predicate, (Argument1) consequent, alternative) :
         (alternative is LexicalVariable) ? Unimplemented () :
         (alternative is Quotation) ? Unimplemented () :
         new PCondIsFixnumEqualA0LA (predicate, consequent, alternative);
 }
Exemplo n.º 2
0
 protected PCondIsFixnumEqualA0LA1(PrimitiveIsFixnumEqualA0L predicate, Argument1 consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
 }
Exemplo n.º 3
0
 protected PCondIsFixnumEqualA0L(PrimitiveIsFixnumEqualA0L predicate, SCode consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.rand1Name = predicate.rand1Name;
     this.rand1Depth = predicate.rand1Depth;
     this.rand1Offset = predicate.rand1Offset;
 }
Exemplo n.º 4
0
 public static SCode Make(PrimitiveIsFixnumEqualA0L predicate, SCode consequent, SCode alternative)
 {
     return
         (predicate is PrimitiveIsFixnumEqualA0A) ? PCondIsFixnumEqualA0A.Make ((PrimitiveIsFixnumEqualA0A) predicate, consequent, alternative) :
         (predicate is PrimitiveIsFixnumEqualA0L1) ? PCondIsFixnumEqualA0L1.Make ((PrimitiveIsFixnumEqualA0L1) predicate, consequent, alternative) :
         (consequent is LexicalVariable) ? PCondIsFixnumEqualA0LL.Make (predicate, (LexicalVariable) consequent, alternative) :
         (consequent is Quotation) ? PCondIsFixnumEqualA0LQ.Make (predicate, (Quotation) consequent, alternative) :
         (alternative is LexicalVariable) ? Unimplemented () :
         (alternative is Quotation) ? PCondIsFixnumEqualA0LSQ.Make (predicate, consequent, (Quotation) alternative) :
         new PCondIsFixnumEqualA0L (predicate, consequent, alternative);
 }
Exemplo n.º 5
0
 public static SCode Make(PrimitiveIsFixnumEqualA0L predicate, SCode consequent, Quotation alternative)
 {
     return
         new PCondIsFixnumEqualA0LSQ (predicate, consequent, alternative);
 }
Exemplo n.º 6
0
 PCondIsFixnumEqualA0LSQ(PrimitiveIsFixnumEqualA0L predicate, SCode consequent, Quotation alternative)
     : base(predicate, consequent, alternative)
 {
     this.alternativeValue = alternative.Quoted;
 }
Exemplo n.º 7
0
 public static SCode Make(PrimitiveIsFixnumEqualA0L predicate, Quotation consequent, SCode alternative)
 {
     return
         (alternative is LexicalVariable) ? Unimplemented () :
         (alternative is Quotation) ? Unimplemented () :
         new PCondIsFixnumEqualA0LQ (predicate, consequent, alternative);
 }
Exemplo n.º 8
0
 protected PCondIsFixnumEqualA0LQ(PrimitiveIsFixnumEqualA0L predicate, Quotation consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.consequentValue = consequent.Quoted;
 }
Exemplo n.º 9
0
 protected PCondIsFixnumEqualA0LL(PrimitiveIsFixnumEqualA0L predicate, LexicalVariable consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
 }