5 ENV = jinja2.Environment(
6 autoescape=jinja2.select_autoescape([]),
7 loader=jinja2.FileSystemLoader('templates'),
11 def generate_integer_literal(c_integer_literal):
12 return 'integerLiteral({})'.format(c_integer_literal.value)
14 def generate_string_literal(c_string_literal):
15 return 'stringLiteral(STRING_LITERAL_LIST[{}])'.format(c_string_literal.index)
17 def generate_symbol_expression(symbol_expression):
18 return 'Environment_get(environment, SYMBOL_LIST[{}] /* symbol: {} */)'.format(
19 symbol_expression.symbol_list_index,
20 symbol_expression.symbol,
23 def generate_variable_expression(expression):
24 return expression.variable
26 def generate_expression(expression):
27 if isinstance(expression, transformation.CNegationExpression):
28 return generate_negation_expression(expression)
30 if isinstance(expression, transformation.CFunctionCallExpression):
31 return generate_function_call(expression)
33 LITERAL_TYPE_MAPPING = {
34 transformation.CIntegerLiteral: generate_integer_literal,
35 transformation.CStringLiteral: generate_string_literal,
36 transformation.CSymbolExpression: generate_symbol_expression,
39 if type(expression) in LITERAL_TYPE_MAPPING:
40 return LITERAL_TYPE_MAPPING[type(expression)](expression)
42 if isinstance(expression, transformation.CFunctionCallForFurInfixOperator):
43 return 'operator${}({}, {})'.format(
45 generate_expression(expression.left),
46 generate_expression(expression.right),
50 transformation.CVariableExpression: generate_variable_expression,
51 }[type(expression)](expression)
53 def generate_negation_expression(c_negation_expression):
54 return 'operator$negate({})'.format(
55 generate_expression(c_negation_expression.value)
58 def generate_function_call(function_call):
59 # This gets called twice, so we want to be sure it is efficient and without side effects
60 assert isinstance(function_call.function_expression, transformation.CVariableExpression)
62 # TODO Check the type of the things being called
63 function_expression = generate_variable_expression(function_call.function_expression)
64 return '{}.instance.closure.call(environmentPool, {}.instance.closure.closed, {}, {})'.format(
67 function_call.argument_count,
68 # TODO This is just a single item containing a reference to the items list--make that clearer
69 generate_expression(function_call.argument_items),
72 def generate_expression_statement(statement):
73 # TODO Do we need to garbage collect the results of arbitrary statements?
74 return '{};'.format(generate_expression(statement.expression))
76 def generate_symbol_assignment_statement(statement):
77 return 'Environment_set(environment, SYMBOL_LIST[{}] /* symbol: {} */, {});'.format(
78 statement.target_symbol_list_index,
80 generate_expression(statement.expression),
83 def generate_array_variable_initialization_statement(statement):
84 return 'Object {}[] = {{ {} }};'.format(
86 ', '.join(generate_expression(i) for i in statement.items),
89 def generate_variable_initialization_statement(statement):
90 return 'Object {} = {};'.format(
92 generate_expression(statement.expression),
95 def generate_variable_reassignment_statement(statement):
96 return '{} = {};'.format(
98 generate_expression(statement.expression),
103 return '\n'.join(' ' * 2 + l for l in s.split('\n'))
105 def generate_if_else_statement(statement):
106 # TODO Check that the argument is boolean
107 condition_expression = '{}.instance.boolean'.format(
108 generate_expression(statement.condition_expression),
111 if len(statement.if_statement_list) == 0:
112 condition_expression = '!({})'.format(condition_expression)
113 if_statement_list = statement.else_statement_list
114 else_statement_list = ()
116 if_statement_list = statement.if_statement_list
117 else_statement_list = statement.else_statement_list
119 generated_if_clause = 'if({})'.format(condition_expression)
121 if len(if_statement_list) == 0:
122 generated_if_statement_list = ';'
124 generated_if_statement_list = indent('\n{{\n{}\n}}'.format(
125 indent('\n'.join(generate_statement(s) for s in if_statement_list)),
128 if len(else_statement_list) == 0:
129 generated_else_statement_list = ''
131 generated_else_statement_list = indent('\nelse\n{{\n{}\n}}'.format(
132 indent('\n'.join(generate_statement(s) for s in else_statement_list)),
135 return generated_if_clause + generated_if_statement_list + generated_else_statement_list
137 def generate_function_declaration(statement):
138 return 'Environment_set(environment, "{}", (Object){{ CLOSURE, (Instance)(Closure){{ environment, user${}$implementation }} }});'.format(statement.name, statement.name)
140 def generate_statement(statement):
142 transformation.CExpressionStatement: generate_expression_statement,
143 transformation.CFunctionDeclaration: generate_function_declaration,
144 transformation.CIfElseStatement: generate_if_else_statement,
145 transformation.CSymbolAssignmentStatement: generate_symbol_assignment_statement,
146 transformation.CArrayVariableInitializationStatement: generate_array_variable_initialization_statement,
147 transformation.CVariableInitializationStatement: generate_variable_initialization_statement,
148 transformation.CVariableReassignmentStatement: generate_variable_reassignment_statement,
149 }[type(statement)](statement)
151 def generate_function_definition(definition):
152 template = ENV.get_template('function_definition.c')
153 return template.render(
154 name=definition.name,
155 argument_name_list=definition.argument_name_list,
156 statement_list=list(generate_statement(s) for s in definition.statement_list),
160 def generate(program):
161 template = ENV.get_template('program.c')
162 return template.render(
163 builtins=tuple(sorted(program.builtin_set)),
164 function_definition_list=list(generate_function_definition(fd) for fd in program.function_definition_list),
165 infix_declarations=program.operator_declarations,
166 statements=list(generate_statement(s) for s in program.statements),
167 standard_libraries=list(sorted(program.standard_libraries)),
168 string_literal_list=program.string_literal_list,
169 symbol_list=program.symbol_list,
172 if __name__ == '__main__':