Class: Faust2Ruby::RubyGenerator

Inherits:
Object
  • Object
show all
Defined in:
lib/faust2ruby/ruby_generator.rb

Overview

Generates idiomatic Ruby DSL code from Faust AST. Produces code compatible with the ruby2faust gem.

Instance Method Summary collapse

Constructor Details

#initialize(options = {}) ⇒ RubyGenerator

Returns a new instance of RubyGenerator.



10
11
12
13
14
 
# File 'lib/faust2ruby/ruby_generator.rb', line 10

def initialize(options = {})
  @indent = options.fetch(:indent, 2)
  @expression_only = options.fetch(:expression_only, false)
  @definitions = {}
end

Instance Method Details

#generate(program) ⇒ Object

Generate Ruby code from a parsed Faust program



17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
 
# File 'lib/faust2ruby/ruby_generator.rb', line 17

def generate(program)
  lines = []

  # Merge multi-rule functions into case expressions
  merged_statements = merge_multirule_functions(program.statements)

  # Collect definitions for reference
  merged_statements.each do |stmt|
    @definitions[stmt.name] = stmt if stmt.is_a?(AST::Definition)
  end

  # Collect imports and declares
  imports = program.statements.select { |s| s.is_a?(AST::Import) }.map(&:path)
  declares = program.statements.select { |s| s.is_a?(AST::Declare) }

  unless @expression_only
    lines << "require 'ruby2faust'"
    lines << "include Ruby2Faust::DSL"
    lines << ""

    # Generate declares as comments
    declares.each do |stmt|
      lines << "# declare #{stmt.key} \"#{stmt.value}\""
    end

    lines << "" if declares.any?

    # Generate helper definitions (excluding process)
    merged_statements.each do |stmt|
      if stmt.is_a?(AST::Definition) && stmt.name != "process"
        lines << generate_definition(stmt)
        lines << ""
      end
    end
  end

  # Generate process
  process_def = @definitions["process"]
  if process_def
    if @expression_only
      lines << generate_expression(process_def.expression)
    else
      lines << "process = #{generate_expression(process_def.expression)}"
      lines << ""

      # Build program with imports and declares
      lines << "prog = Ruby2Faust::Program.new(process)"
      imports.each do |imp|
        lines << "  .import(#{imp.inspect})" unless imp == "stdfaust.lib"
      end
      declares.each do |d|
        lines << "  .declare(:#{d.key}, #{d.value.inspect})"
      end
      lines << ""
      lines << "puts Ruby2Faust::Emitter.program(prog)"
    end
  end

  lines.join("\n")
end

#generate_expression(node) ⇒ Object

Generate just the expression part (for embedding)



79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
 
# File 'lib/faust2ruby/ruby_generator.rb', line 79

def generate_expression(node)
  case node
  when AST::IntLiteral
    node.value.to_s

  when AST::FloatLiteral
    node.value.to_s

  when AST::StringLiteral
    node.value.inspect

  when AST::Wire
    "wire"

  when AST::Cut
    "cut"

  when AST::Identifier
    generate_identifier(node)

  when AST::QualifiedName
    generate_qualified_name(node)

  when AST::BinaryOp
    generate_binary_op(node)

  when AST::UnaryOp
    generate_unary_op(node)

  when AST::FunctionCall
    generate_function_call(node)

  when AST::UIElement
    generate_ui_element(node)

  when AST::UIGroup
    generate_ui_group(node)

  when AST::Iteration
    generate_iteration(node)

  when AST::Lambda
    generate_lambda(node)

  when AST::Waveform
    generate_waveform(node)

  when AST::Table
    generate_table(node)

  when AST::Route
    generate_route(node)

  when AST::Prime
    generate_prime(node)

  when AST::Access
    generate_access(node)

  when AST::Paren
    "(#{generate_expression(node.expression)})"

  when AST::With
    generate_with(node)

  when AST::Letrec
    generate_letrec(node)

  when AST::CaseExpr
    generate_case_expr(node)

  else
    make_literal("/* unknown: #{node.class} */")
  end
end