Ejemplo n.º 1
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, SCode consequent, LexicalVariable1 alternative)
 {
     return
         new PCondIsObjectEqL1QSx (predicate, consequent, alternative);
 }
Ejemplo n.º 2
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, SCode consequent, Quotation alternative)
 {
     return
         new PCondIsObjectEqL1QSQ (predicate, consequent, alternative);
 }
Ejemplo n.º 3
0
 PCondIsObjectEqL1QSx(PrimitiveIsObjectEqL1Q predicate, SCode consequent, LexicalVariable1 alternative)
     : base(predicate, consequent, alternative)
 {
 }
Ejemplo n.º 4
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, SCode consequent, LexicalVariable alternative)
 {
     return
         (alternative is Argument) ? Unimplemented() :
         (alternative is LexicalVariable1) ? ((predicate.rand0Offset == alternative.Offset) ? PCondIsObjectEqL1QSx.Make (predicate, consequent, (LexicalVariable1) alternative) : PCondIsObjectEqL1QSL1.Make (predicate, consequent, (LexicalVariable1) alternative)) :
         new PCondIsObjectEqL1QSL (predicate, consequent, alternative);
 }
Ejemplo n.º 5
0
 PCondIsObjectEqL1QSQ(PrimitiveIsObjectEqL1Q predicate, SCode consequent, Quotation alternative)
     : base(predicate, consequent, alternative)
 {
     this.alternativeValue = alternative.Quoted;
 }
Ejemplo n.º 6
0
 PCondIsObjectEqL1QQx(PrimitiveIsObjectEqL1Q predicate, Quotation consequent, LexicalVariable1 alternative)
     : base(predicate, consequent, alternative)
 {
 }
Ejemplo n.º 7
0
 protected PCondIsObjectEqL1QSL(PrimitiveIsObjectEqL1Q predicate, SCode consequent, LexicalVariable alternative)
     : base(predicate, consequent, alternative)
 {
     this.alternativeName = alternative.Name;
     this.alternativeDepth = alternative.Depth;
     this.alternativeOffset = alternative.Offset;
 }
Ejemplo n.º 8
0
 protected PCondIsObjectEqL1QQ(PrimitiveIsObjectEqL1Q predicate, Quotation consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.consequentValue = consequent.Quoted;
 }
Ejemplo n.º 9
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, Quotation consequent, SCode alternative)
 {
     if (predicate.rand1Value == consequent.Quoted) Debugger.Break ();
     return
         (alternative is LexicalVariable) ? PCondIsObjectEqL1QQL.Make (predicate, consequent, (LexicalVariable) alternative) :
         (alternative is Quotation) ? Unimplemented () :
         new PCondIsObjectEqL1QQ (predicate, consequent, alternative);
 }
Ejemplo n.º 10
0
 protected PCondIsObjectEqL1QL(PrimitiveIsObjectEqL1Q predicate, LexicalVariable consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
 }
Ejemplo n.º 11
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, LexicalVariable consequent, SCode alternative)
 {
     return
         (consequent is Argument) ? PCondIsObjectEqL1QA.Make (predicate, (Argument) consequent, alternative) :
         (consequent is LexicalVariable1) ? Unimplemented() :
         (alternative is LexicalVariable) ? Unimplemented():
         (alternative is Quotation) ? Unimplemented () :
         new PCondIsObjectEqL1QL (predicate, consequent, alternative);
 }
Ejemplo n.º 12
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, Argument0 consequent, SCode alternative)
 {
     return
         (alternative is LexicalVariable) ? Unimplemented () :
         (alternative is Quotation) ? Unimplemented () :
         new PCondIsObjectEqL1QA0 (predicate, consequent, alternative);
 }
Ejemplo n.º 13
0
 protected PCondIsObjectEqL1QA0(PrimitiveIsObjectEqL1Q predicate, Argument0 consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
 }
Ejemplo n.º 14
0
 public static SCode Make(PrimitiveIsObjectEqL1Q predicate, SCode consequent, SCode alternative)
 {
     return
         (consequent is LexicalVariable) ? PCondIsObjectEqL1QL.Make (predicate, (LexicalVariable) consequent, alternative) :
         (consequent is Quotation) ? PCondIsObjectEqL1QQ.Make (predicate, (Quotation) consequent, alternative) :
         (alternative is LexicalVariable) ? PCondIsObjectEqL1QSL.Make (predicate, consequent, (LexicalVariable) alternative) :
         (alternative is Quotation) ? PCondIsObjectEqL1QSQ.Make (predicate, consequent, (Quotation) alternative) :
         new PCondIsObjectEqL1Q (predicate, consequent, alternative);
 }
Ejemplo n.º 15
0
 protected PCondIsObjectEqL1Q(PrimitiveIsObjectEqL1Q predicate, SCode consequent, SCode alternative)
     : base(predicate, consequent, alternative)
 {
     this.rand1Value = predicate.rand1Value;
 }
Ejemplo n.º 16
0
 public static SCode Make(Primitive2 rator, LexicalVariable1 rand0, SCode rand1)
 {
     return
         ((rand1 is Quotation) ? PrimitiveIsObjectEqL1Q.Make(rator, rand0, (Quotation)rand1)
         : Unimplemented());
 }