2014-04-24 14:43:20 +02:00
|
|
|
require 'parslet'
|
2014-05-05 08:51:16 +02:00
|
|
|
require 'ast/expression'
|
2014-04-24 14:43:20 +02:00
|
|
|
|
2014-04-27 14:44:34 +02:00
|
|
|
module Parser
|
2014-04-24 14:43:20 +02:00
|
|
|
class Transform < Parslet::Transform
|
2014-05-09 12:51:47 +02:00
|
|
|
rule(:string => sequence(:chars)) { Ast::StringExpression.new chars.join }
|
|
|
|
rule(:esc => simple(:esc)) { '\\' + esc }
|
|
|
|
rule(char: simple(:char)) { char }
|
|
|
|
|
2014-05-05 08:51:16 +02:00
|
|
|
rule(:integer => simple(:value)) { Ast::IntegerExpression.new(value.to_i) }
|
|
|
|
rule(:name => simple(:name)) { Ast::NameExpression.new(name.to_s) }
|
2014-04-24 14:43:20 +02:00
|
|
|
|
2014-04-27 20:12:42 +02:00
|
|
|
rule(:argument => simple(:argument)) { argument }
|
|
|
|
rule(:argument_list => sequence(:argument_list)) { argument_list }
|
2014-04-24 14:43:20 +02:00
|
|
|
|
2014-04-27 20:41:38 +02:00
|
|
|
rule( :function_call => simple(:function_call),
|
|
|
|
:argument_list => sequence(:argument_list)) do
|
2014-05-05 08:51:16 +02:00
|
|
|
Ast::FuncallExpression.new(function_call.name, argument_list)
|
2014-04-27 20:12:42 +02:00
|
|
|
end
|
2014-04-24 14:43:20 +02:00
|
|
|
|
2014-04-27 20:41:38 +02:00
|
|
|
rule(:conditional => simple(:conditional),
|
2014-04-28 15:07:34 +02:00
|
|
|
:if_true => {:expressions => sequence(:if_true)},
|
|
|
|
:if_false => {:expressions => sequence(:if_false)}) do
|
2014-05-05 08:51:16 +02:00
|
|
|
Ast::ConditionalExpression.new(conditional, if_true, if_false)
|
2014-04-28 15:07:34 +02:00
|
|
|
end
|
2014-04-27 20:41:38 +02:00
|
|
|
|
2014-05-10 18:02:51 +02:00
|
|
|
rule(:while => simple(:while), :while_cond => simple(:while_cond) , :do => simple(:do),
|
|
|
|
:body => {:expressions => sequence(:body)}) do
|
|
|
|
Ast::WhileExpression.new(while_cond, body)
|
|
|
|
end
|
|
|
|
|
2014-04-27 20:41:38 +02:00
|
|
|
rule(:parmeter => simple(:parmeter)) { parmeter }
|
|
|
|
rule(:parmeter_list => sequence(:parmeter_list)) { parmeter_list }
|
2014-04-24 14:43:20 +02:00
|
|
|
|
2014-04-27 20:12:42 +02:00
|
|
|
rule(:function_definition => simple(:function_definition),
|
2014-04-27 20:41:38 +02:00
|
|
|
:parmeter_list => sequence(:parmeter_list),
|
2014-04-28 15:07:34 +02:00
|
|
|
:expressions => sequence(:expressions)) do
|
2014-05-05 08:51:16 +02:00
|
|
|
Ast::FunctionExpression.new(function_definition.name, parmeter_list, expressions)
|
2014-04-27 20:12:42 +02:00
|
|
|
end
|
2014-04-27 15:30:32 +02:00
|
|
|
|
2014-04-28 20:21:12 +02:00
|
|
|
rule(:asignee => simple(:left) , :asigned => simple(:right) ) do
|
2014-05-05 08:51:16 +02:00
|
|
|
Ast::AssignmentExpression.new(left.name, right )
|
2014-04-28 20:21:12 +02:00
|
|
|
end
|
2014-04-27 15:30:32 +02:00
|
|
|
#shortcut to get the ast tree for a given string
|
|
|
|
# optional second arguement specifies a rule that will be parsed (mainly for testing)
|
|
|
|
def self.ast string , rule = :root
|
|
|
|
syntax = Parser.new.send(rule).parse(string)
|
|
|
|
tree = Transform.new.apply(syntax)
|
|
|
|
tree
|
|
|
|
end
|
2014-04-24 14:43:20 +02:00
|
|
|
end
|
|
|
|
end
|