Rewrite as trees
This commit is contained in:
parent
6376a1e82b
commit
4df35173a6
1 changed files with 59 additions and 28 deletions
|
@ -1,27 +1,58 @@
|
||||||
module Mm2ep
|
module Mm2ep
|
||||||
module Depend
|
module Depend
|
||||||
class And_op
|
class Treenode
|
||||||
|
def initialize
|
||||||
|
end
|
||||||
|
|
||||||
|
# c
|
||||||
|
def compute
|
||||||
|
raise NotImplementedError
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
class VarExpr < Treenode
|
||||||
|
def initialize str
|
||||||
|
@name = str
|
||||||
|
@value = nil
|
||||||
|
end
|
||||||
|
|
||||||
|
def set value
|
||||||
|
@value = value
|
||||||
|
end
|
||||||
|
|
||||||
|
def compute
|
||||||
|
@value
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
class BoolExpr < Treenode
|
||||||
|
def initialize str
|
||||||
|
@value = case str
|
||||||
|
when /true/i then true
|
||||||
|
when /false/i then false
|
||||||
|
end
|
||||||
|
|
||||||
|
end
|
||||||
|
|
||||||
|
def compute
|
||||||
|
@value
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
class AndOp < Treenode
|
||||||
attr_reader :expr1, :expr2
|
attr_reader :expr1, :expr2
|
||||||
def initialize expr1, expr2
|
def initialize expr1, expr2
|
||||||
unless expr1.value.to_s.match(/true/).nil?
|
@expr1 = expr1
|
||||||
@expr1 = true
|
@expr2 = expr2
|
||||||
else
|
|
||||||
@expr1 = false
|
|
||||||
end
|
|
||||||
unless expr2.value.to_s.match(/true/).nil?
|
|
||||||
@expr2 = true
|
|
||||||
else
|
|
||||||
@expr2 = false
|
|
||||||
end
|
|
||||||
end
|
end
|
||||||
|
|
||||||
def and_op
|
def compute
|
||||||
# binding.pry
|
# binding.pry
|
||||||
return @expr1 && @expr2
|
return @expr1.compute && @expr2.compute
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
||||||
class Or_op
|
class OrOp
|
||||||
attr_reader :expr1, :expr2
|
attr_reader :expr1, :expr2
|
||||||
def initialize expr1, expr2
|
def initialize expr1, expr2
|
||||||
unless expr1.value.to_s.match(/true/).nil?
|
unless expr1.value.to_s.match(/true/).nil?
|
||||||
|
@ -36,7 +67,7 @@ module Mm2ep
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
||||||
def or_op
|
def compute
|
||||||
return @expr1 || @expr2
|
return @expr1 || @expr2
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
@ -47,14 +78,14 @@ module Mm2ep
|
||||||
@expr = expr
|
@expr = expr
|
||||||
end
|
end
|
||||||
|
|
||||||
def not_op
|
def compute
|
||||||
# binding.pry
|
# binding.pry
|
||||||
return true unless @expr.value.to_s.eql? 'true'
|
return true unless @expr.value.to_s.eql? 'true'
|
||||||
return false
|
return false
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
||||||
class Eq_op
|
class EqOp
|
||||||
attr_reader :val, :other
|
attr_reader :val, :other
|
||||||
def initialize val, other
|
def initialize val, other
|
||||||
@val = val.value.to_s
|
@val = val.value.to_s
|
||||||
|
@ -65,7 +96,7 @@ module Mm2ep
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
||||||
def eq_op
|
def compute
|
||||||
return if val == @other
|
return if val == @other
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
@ -80,46 +111,46 @@ module Mm2ep
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : VAR' do |ex, l|
|
rule 'expr : VAR' do |ex, l|
|
||||||
ex.value = l.value
|
ex.value = VarExpr.new(l.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : T_BOOL' do |ex, l|
|
rule 'expr : T_BOOL' do |ex, l|
|
||||||
ex.value = l.value
|
ex.value = BoolExpr.new(l.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : F_BOOL' do |ex, l|
|
rule 'expr : F_BOOL' do |ex, l|
|
||||||
ex.value = l.value
|
ex.value = BoolExpr.new(l.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : NOT_OP SPACE expr' do |ex, l, s, e|
|
rule 'expr : NOT_OP SPACE expr' do |ex, l, s, e|
|
||||||
ex.value = Not_op.new(e).not_op
|
ex.value = Not_op.new(e.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : expr SPACE AND_OP SPACE expr' do |ex, l, s, e, sp, r|
|
rule 'expr : expr SPACE AND_OP SPACE expr' do |ex, l, s, e, sp, r|
|
||||||
ex.value = And_op.new(l, r).and_op
|
ex.value = AndOp.new(l.value, r.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : expr SPACE OR_OP SPACE expr' do |ex, l, s, e, sp, r|
|
rule 'expr : expr SPACE OR_OP SPACE expr' do |ex, l, s, e, sp, r|
|
||||||
ex.value = Or_op.new(l, r).or_op
|
ex.value = OrOp.new(l.value, r.value)
|
||||||
end
|
end
|
||||||
rule 'expr : L_PAR SPACE expr SPACE R_PAR' do |ex, l, s, e, sp, r|
|
rule 'expr : L_PAR SPACE expr SPACE R_PAR' do |ex, l, s, e, sp, r|
|
||||||
ex.value = e.value
|
ex.value = e.value
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : VAR SPACE EQ_OP SPACE F_BOOL' do |ex, v, s, eq, _, n|
|
rule 'expr : VAR SPACE EQ_OP SPACE F_BOOL' do |ex, v, s, eq, _, n|
|
||||||
ex.value = Eq_op.new(v, n).eq_op
|
ex.value = EqOp.new(v.value, n.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : VAR SPACE EQ_OP SPACE T_BOOL' do |ex, v, s, eq, _, n|
|
rule 'expr : VAR SPACE EQ_OP SPACE T_BOOL' do |ex, v, s, eq, _, n|
|
||||||
ex.value = Eq_op.new(v, n).eq_op
|
ex.value = EqOp.new(v.value, n.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : VAR SPACE EQ_OP SPACE STRING' do |ex, v, s, eq, _, n|
|
rule 'expr : VAR SPACE EQ_OP SPACE STRING' do |ex, v, s, eq, _, n|
|
||||||
ex.value = Eq_op.new(v, n).eq_op
|
ex.value = EqOp.new(v.value, n.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
rule 'expr : VAR SPACE EQ_OP SPACE NUMBER' do |ex, v, s, eq, _, n|
|
rule 'expr : VAR SPACE EQ_OP SPACE NUMBER' do |ex, v, s, eq, _, n|
|
||||||
ex.value = Eq_op.new(v, n).eq_op
|
ex.value = EqOp.new(v.value, n.value)
|
||||||
end
|
end
|
||||||
|
|
||||||
end # class
|
end # class
|
||||||
|
|
Loading…
Reference in a new issue