使用 Ruby 解析 Tcl DSL

Question

我希望能够解析一些参数没有被字符串包围的 Tcl 代码。

考虑这个 tcl 代码：

proc foo {name} {
  puts "Foo --> $name"
}    

foo bar

对于那些不熟悉 Tcl 的人来说，foo 是方法名称，bar 是参数（引号在 Tcl 中是可选的）。

前面的代码将输出：

Foo --> bar

Is it possible to parse exactly using ruby​​ (bar still unquoted)?

等效的 ruby​​ 代码是：

def foo(name)
  puts "Foo --> #{name}"
end

tcl = <<-TCL.gsub(/^\s+/, "").chop
  foo bar
TCL
instance_eval(tcl)

当然，当它到达 bar 时会失败，因为它预计会被引用。

我尝试过修改 method_missing

def method_missing(meth, *args)
    puts meth.to_s + " --> args.to_s
end

但它以相反的顺序解析：

to_hash --> []
bar --> []
foo --> [nil]

是否有人对此类问题有一个干净的解决方案。我想避免对字符串进行标记，因为与词法分析相比，通过调用方法读取数据所需的工作量最少。但如果我想做一些不可能的事情，我想知道。谢谢。

Answer 1

它对你不起作用，因为 .puts 方法返回 nil 而不是字符串：

irb(main):003:0> puts "42"
42
=> nil

我真的不知道为什么 to_hash 出现在这个 < code>method_missing 但它有效：

def foo(name)
  puts "Foo --> #{name}"
end

def method_missing(meth, *args)
     meth.to_s unless meth.to_s  == "to_hash"
end

tcl = <<-TCL.gsub(/^\s+/, "").chop
  foo bar
TCL

instance_eval(tcl)

=> Foo --> bar

Answer 2

这是一个尝试使语法接近TCL语法的实现。

class TCL
  class << self
    alias run instance_eval
    def proc(n, &b)
      self.class.__send__(:define_method, n, &b)
    end
    def method_missing(n, *a, &b)
      n.to_s
    end
  end
end

TCL.run do

  proc(:foo) { |name|
    puts "Foo --> #{name}"
  }

  foo bar

end

# prints Foo --> bar