Added lambda expressions
[fur] / generation.py
1 import jinja2
2
3 import transformation
4
5 ENV = jinja2.Environment(
6     autoescape=jinja2.select_autoescape([]),
7     loader=jinja2.FileSystemLoader('templates'),
8     trim_blocks=True,
9 )
10
11 def generate_integer_literal(c_integer_literal):
12     return 'integerLiteral({})'.format(c_integer_literal.value)
13
14 def generate_string_literal(c_string_literal):
15     return 'stringLiteral(STRING_LITERAL_LIST[{}] /* string: {} */)'.format(
16         c_string_literal.index,
17         repr(c_string_literal.value),
18     )
19
20 def generate_symbol_expression(symbol_expression):
21     return 'Environment_get(environment, SYMBOL_LIST[{}] /* symbol: {} */)'.format(
22         symbol_expression.symbol_list_index,
23         symbol_expression.symbol,
24     )
25
26 def generate_variable_expression(expression):
27     return expression.variable
28
29 def generate_structure_literal_expression(expression):
30     return 'Structure_construct({}, {}, {})'.format(
31         expression.field_count,
32         expression.symbol_list_variable,
33         expression.value_list_variable,
34     )
35
36 def generate_lambda_expression(expression):
37     return '(Object){{ CLOSURE, (Instance)(Closure){{ environment, user${}$implementation }} }}'.format(
38         expression.name,
39     )
40
41 def generate_list_construct_expression(expression):
42     return 'List_construct({})'.format(expression.allocate)
43
44 def generate_expression(expression):
45     return {
46         transformation.CFunctionCallExpression: generate_function_call,
47         transformation.CIntegerLiteral: generate_integer_literal,
48         transformation.CLambdaExpression: generate_lambda_expression,
49         transformation.CListConstructExpression: generate_list_construct_expression,
50         transformation.CStringLiteral: generate_string_literal,
51         transformation.CStructureLiteralExpression: generate_structure_literal_expression,
52         transformation.CSymbolExpression: generate_symbol_expression,
53         transformation.CVariableExpression: generate_variable_expression,
54     }[type(expression)](expression)
55
56 def generate_function_call(function_call):
57     # This gets called twice, so we want to be sure it is efficient and without side effects
58     assert isinstance(function_call.function_expression, transformation.CVariableExpression)
59
60     # TODO Check the type of the things being called
61     function_expression = generate_variable_expression(function_call.function_expression)
62     return '{}.instance.closure.call(environmentPool, {}.instance.closure.closed, {}, stack, {}, jump)'.format(
63         function_expression,
64         function_expression,
65         function_call.argument_count,
66         function_call.metadata.line,
67     )
68
69 def generate_expression_statement(statement):
70     return 'Object_deinitialize(&({}));'.format(generate_expression(statement.expression))
71
72 def generate_symbol_assignment_statement(statement):
73     return 'Environment_set(environment, SYMBOL_LIST[{}] /* symbol: {} */, {});'.format(
74         statement.target_symbol_list_index,
75         statement.target,
76         generate_expression(statement.expression),
77     )
78
79 def generate_array_variable_initialization_statement(statement):
80     return 'Object {}[] = {{ {} }};'.format(
81         statement.variable,
82         ', '.join(generate_expression(i) for i in statement.items),
83     )
84
85 def generate_symbol_array_variable_initialization_statement(statement):
86     return 'const char* {}[] = {{ {} }};'.format(
87         statement.variable,
88         ', '.join('SYMBOL_LIST[{}] /* symbol: "{}" */'.format(
89             statement.symbol_list_indices[i],
90             statement.symbol_list[i],
91         ) for i in range(len(statement.symbol_list))),
92     )
93
94 def generate_variable_initialization_statement(statement):
95     return 'Object {} = {};'.format(
96         statement.variable,
97         generate_expression(statement.expression),
98     )
99
100 def generate_variable_reassignment_statement(statement):
101     return '{} = {};'.format(
102         statement.variable,
103         generate_expression(statement.expression),
104     )
105
106
107 def indent(s):
108     return '\n'.join(' ' * 2 + l for l in s.split('\n'))
109
110 def generate_if_else_statement(statement):
111     # TODO Check that the argument is boolean
112     condition_expression = '{}.instance.boolean'.format(
113         generate_expression(statement.condition_expression),
114     )
115
116     if len(statement.if_statement_list) == 0:
117         condition_expression = '!({})'.format(condition_expression)
118         if_statement_list = statement.else_statement_list
119         else_statement_list = ()
120     else:
121         if_statement_list = statement.if_statement_list
122         else_statement_list = statement.else_statement_list
123
124     generated_if_clause = 'if({})'.format(condition_expression)
125
126     if len(if_statement_list) == 0:
127         generated_if_statement_list = ';'
128     else:
129         generated_if_statement_list = indent('\n{{\n{}\n}}'.format(
130             indent('\n'.join(generate_statement(s) for s in if_statement_list)),
131         ))
132
133     if len(else_statement_list) == 0:
134         generated_else_statement_list = ''
135     else:
136         generated_else_statement_list = indent('\nelse\n{{\n{}\n}}'.format(
137             indent('\n'.join(generate_statement(s) for s in else_statement_list)),
138         ))
139
140     return generated_if_clause + generated_if_statement_list + generated_else_statement_list
141
142 def generate_function_declaration(statement):
143     return 'Environment_set(environment, "{}", (Object){{ CLOSURE, (Instance)(Closure){{ environment, user${}$implementation }} }});'.format(
144         statement.name,
145         statement.name,
146     )
147
148 def generate_list_append_statement(statement):
149     return 'List_append(&{}, {});'.format(
150         generate_expression(statement.list_expression),
151         generate_expression(statement.item_expression),
152     )
153
154 def generate_push_statement(statement):
155     return 'Stack_push(stack, {});'.format(generate_expression(statement.expression))
156
157 def generate_statement(statement):
158     return {
159         transformation.CArrayVariableInitializationStatement: generate_array_variable_initialization_statement,
160         transformation.CExpressionStatement: generate_expression_statement,
161         transformation.CFunctionDeclaration: generate_function_declaration,
162         transformation.CIfElseStatement: generate_if_else_statement,
163         transformation.CListAppendStatement: generate_list_append_statement,
164         transformation.CPushStatement: generate_push_statement,
165         transformation.CSymbolAssignmentStatement: generate_symbol_assignment_statement,
166         transformation.CSymbolArrayVariableInitializationStatement: generate_symbol_array_variable_initialization_statement,
167         transformation.CVariableInitializationStatement: generate_variable_initialization_statement,
168         transformation.CVariableReassignmentStatement: generate_variable_reassignment_statement,
169     }[type(statement)](statement)
170
171 def generate_function_definition(definition):
172     template = ENV.get_template('function_definition.c')
173     return template.render(
174         name=definition.name,
175         argument_name_list=definition.argument_name_list,
176         statement_list=list(generate_statement(s) for s in definition.statement_list),
177     )
178     return definition
179
180 C_ESCAPES = {
181     '"':    r'\"',
182 }
183
184 def escape_character(ch):
185     return C_ESCAPES.get(ch, ch)
186
187 def escape_string_literal(string_literal):
188     return  ''.join(escape_character(ch) for ch in string_literal)
189
190 def generate(program):
191     template = ENV.get_template('program.c')
192     return template.render(
193         builtins=tuple(sorted(program.builtin_set)),
194         function_definition_list=list(generate_function_definition(fd) for fd in program.function_definition_list),
195         infix_declarations=program.operator_declarations,
196         statements=list(generate_statement(s) for s in program.statements),
197         standard_libraries=list(sorted(program.standard_libraries)),
198         string_literal_list=list(escape_string_literal(s) for s in program.string_literal_list),
199         symbol_list=program.symbol_list,
200     )
201
202 if __name__ == '__main__':
203     import unittest
204
205     unittest.main()