Module: Expressir::Express::Formatters::StatementsFormatter

Included in:
Expressir::Express::Formatter
Defined in:
lib/expressir/express/formatters/statements_formatter.rb

Class Method Summary collapse

Instance Method Summary collapse

Class Method Details

.included(base) ⇒ Object 



5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 5

def self.included(base)
  base.register_formatter Model::Statements::Alias,
                          :format_statements_alias
  base.register_formatter Model::Statements::Assignment,
                          :format_statements_assignment
  base.register_formatter Model::Statements::Case,
                          :format_statements_case
  base.register_formatter Model::Statements::CaseAction,
                          :format_statements_case_action
  base.register_formatter Model::Statements::Compound,
                          :format_statements_compound
  base.register_formatter Model::Statements::Escape,
                          :format_statements_escape
  base.register_formatter Model::Statements::If, :format_statements_if
  base.register_formatter Model::Statements::Null,
                          :format_statements_null
  base.register_formatter Model::Statements::ProcedureCall,
                          :format_statements_procedure_call
  base.register_formatter Model::Statements::Repeat,
                          :format_statements_repeat
  base.register_formatter Model::Statements::Return,
                          :format_statements_return
  base.register_formatter Model::Statements::Skip,
                          :format_statements_skip
end

Instance Method Details

#format_statements_alias(node) ⇒ Object 



31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 31

def format_statements_alias(node)
  [
    [
      "ALIAS",
      " ",
      node.id,
      " ",
      "FOR",
      " ",
      format(node.expression),
      ";",
    ].join,
    *if node.statements&.length&.positive?
       indent(node.statements.map { |x| format(x) }.join("\n"))
     end,
    *format_remarks(node),
    [
      "END_ALIAS",
      ";",
    ].join,
  ].join("\n")
end

#format_statements_assignment(node) ⇒ Object 



54
55
56
57
58
59
60
61
62
63
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 54

def format_statements_assignment(node)
  [
    format(node.ref),
    " ",
    ":=",
    " ",
    format(node.expression),
    ";",
  ].join
end

#format_statements_case(node) ⇒ Object 



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
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 79

def format_statements_case(node)
  [
    [
      "CASE",
      " ",
      format(node.expression),
      " ",
      "OF",
    ].join,
    *if node.actions&.length&.positive?
       node.actions.map { |x| format(x) }
     end,
    *if node.otherwise_statement
       [
         [
           "OTHERWISE",
           " ",
           ":",
         ].join,
         indent(format(node.otherwise_statement)),
       ]
     end,
    [
      "END_CASE",
      ";",
    ].join,
  ].join("\n")
end

#format_statements_case_action(node) ⇒ Object 



108
109
110
111
112
113
114
115
116
117
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 108

def format_statements_case_action(node)
  [
    [
      Array(node.labels).map { |x| format(x) }.join(", "),
      " ",
      ":",
    ].join,
    indent(format(node.statement)),
  ].join("\n")
end

#format_statements_compound(node) ⇒ Object 



119
120
121
122
123
124
125
126
127
128
129
130
131
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 119

def format_statements_compound(node)
  statements = Array(node.statements)
  [
    "BEGIN",
    *if statements.length.positive?
       indent(statements.map { |x| format(x) }.join("\n"))
     end,
    [
      "END",
      ";",
    ].join,
  ].join("\n")
end

#format_statements_escape(_node) ⇒ Object 



133
134
135
136
137
138
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 133

def format_statements_escape(_node)
  [
    "ESCAPE",
    ";",
  ].join
end

#format_statements_if(node) ⇒ Object 



140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 140

def format_statements_if(node)
  [
    [
      "IF",
      " ",
      format(node.expression),
      " ",
      "THEN",
    ].join,
    *if node.statements&.length&.positive?
       indent(node.statements.map { |x| format(x) }.join("\n"))
     end,
    *if node.else_statements&.length&.positive?
       [
         "ELSE",
         indent(node.else_statements.map { |x| format(x) }.join("\n")),
       ].join("\n")
     end,
    [
      "END_IF",
      ";",
    ].join,
  ].join("\n")
end

#format_statements_null(_node) ⇒ Object 



165
166
167
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 165

def format_statements_null(_node)
  ";"
end

#format_statements_procedure_call(node) ⇒ Object 



65
66
67
68
69
70
71
72
73
74
75
76
77
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 65

def format_statements_procedure_call(node)
  [
    format(node.procedure),
    *if node.parameters&.length&.positive?
       [
         "(",
         node.parameters.map { |x| format(x) }.join(", "),
         ")",
       ].join
     end,
    ";",
  ].join
end

#format_statements_repeat(node) ⇒ Object 



169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 169

def format_statements_repeat(node)
  statements = Array(node.statements)
  [
    [
      "REPEAT",
      *if node.id
         [
           " ",
           node.id,
           " ",
           ":=",
           " ",
           format(node.bound1),
           " ",
           "TO",
           " ",
           format(node.bound2),
           *if node.increment
              [
                " ",
                "BY",
                " ",
                format(node.increment),
              ].join
            end,
         ].join
       end,
      *if node.while_expression
         [
           " ",
           "WHILE",
           " ",
           format(node.while_expression),
         ].join
       end,
      *if node.until_expression
         [
           " ",
           "UNTIL",
           " ",
           format(node.until_expression),
         ].join
       end,
      ";",
    ].join,
    *if statements.length.positive?
       indent(statements.map { |x| format(x) }.join("\n"))
     end,
    *format_remarks(node),
    [
      "END_REPEAT",
      ";",
    ].join,
  ].join("\n")
end

#format_statements_return(node) ⇒ Object 



225
226
227
228
229
230
231
232
233
234
235
236
237
238
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 225

def format_statements_return(node)
  [
    "RETURN",
    *if node.expression
       [
         " ",
         "(",
         format(node.expression),
         ")",
       ].join
     end,
    ";",
  ].join
end

#format_statements_skip(_node) ⇒ Object 



240
241
242
243
244
245
 
# File 'lib/expressir/express/formatters/statements_formatter.rb', line 240

def format_statements_skip(_node)
  [
    "SKIP",
    ";",
  ].join
end