X-Git-Url: https://code.kerkeslager.com/?p=fur;a=blobdiff_plain;f=transformation.py;h=e8ee51c9bab31edc1a60c0d4dbb841d95baefa67;hp=cd9d18d9983ee39d7ba677c9ea19a1ee3ea48a55;hb=aa339c441f43849a8cae256aa130278ca7618b7e;hpb=a859f78651b4da2d31890b9c7b01a431fa7a93f6 diff --git a/transformation.py b/transformation.py index cd9d18d..e8ee51c 100644 --- a/transformation.py +++ b/transformation.py @@ -1,6 +1,6 @@ import collections -import parsing +import conversion CIntegerLiteral = collections.namedtuple( 'CIntegerLiteral', @@ -12,14 +12,15 @@ CIntegerLiteral = collections.namedtuple( CStringLiteral = collections.namedtuple( 'CStringLiteral', [ + 'index', 'value', ], ) -CConstantExpression = collections.namedtuple( - 'CConstantExpression', +CVariableExpression = collections.namedtuple( + 'CVariableExpression', [ - 'value' + 'variable', ], ) @@ -31,290 +32,374 @@ CSymbolExpression = collections.namedtuple( ], ) -CNegationExpression = collections.namedtuple( - 'CNegationExpression', +CStructureLiteralExpression = collections.namedtuple( + 'CStructureLiteralExpression', [ - 'value', - ], -) - -CAdditionExpression = collections.namedtuple( - 'CAdditionExpression', - [ - 'left', - 'right', - ], -) - -CSubtractionExpression = collections.namedtuple( - 'CSubtractionExpression', - [ - 'left', - 'right', + 'field_count', + 'symbol_list_variable', + 'value_list_variable', ], ) -CMultiplicationExpression = collections.namedtuple( - 'CMultiplicationExpression', - [ - 'left', - 'right', - ], -) - -CIntegerDivisionExpression = collections.namedtuple( - 'CIntegerDivisionExpression', - [ - 'left', - 'right', - ], +CPushStatement = collections.namedtuple( + 'CPushStatement', + ( + 'expression', + ), ) -CEqualityExpression = collections.namedtuple( - 'CEqualityExpression', - [ - 'left', - 'right', - ], +CFunctionCallExpression = collections.namedtuple( + 'CFunctionCallExpression', + ( + 'metadata', + 'function_expression', + 'argument_count', + ), ) -CInequalityExpression = collections.namedtuple( - 'CInequalityExpression', +# TODO We are currently not changing variables, just preventing them from being accessed. +CSymbolAssignmentStatement = collections.namedtuple( + 'CSymbolAssignmentStatement', [ - 'left', - 'right', + 'target', + 'target_symbol_list_index', + 'expression', ], ) -CGreaterThanOrEqualExpression = collections.namedtuple( - 'CGreaterThanOrEqualExpression', +CArrayVariableInitializationStatement = collections.namedtuple( + 'CArrayVariableInitializationStatement', [ - 'left', - 'right', + 'variable', + 'items', ], ) -CLessThanOrEqualExpression = collections.namedtuple( - 'CLessThanOrEqualExpression', +CSymbolArrayVariableInitializationStatement = collections.namedtuple( + 'CSymbolArrayVariableInitializationStatement', [ - 'left', - 'right', + 'variable', + 'symbol_list', + 'symbol_list_indices', ], ) -CGreaterThanExpression = collections.namedtuple( - 'CGreaterThanExpression', +CVariableInitializationStatement = collections.namedtuple( + 'CVariableInitializationStatement', [ - 'left', - 'right', + 'variable', + 'expression', ], ) -CLessThanExpression = collections.namedtuple( - 'CLessThanExpression', +CVariableReassignmentStatement = collections.namedtuple( + 'CVariableReassignmentStatement', [ - 'left', - 'right', + 'variable', + 'expression', ], ) -CAndExpression = collections.namedtuple( - 'CAndExpression', +CExpressionStatement = collections.namedtuple( + 'CExpressionStatement', [ - 'left', - 'right', + 'expression', ], ) - -CModularDivisionExpression = collections.namedtuple( - 'CModularDivisionExpression', +CIfElseStatement = collections.namedtuple( + 'CIfElseStatement', [ - 'left', - 'right', + 'condition_expression', + 'if_statement_list', + 'else_statement_list', ], ) -CFunctionCallExpression = collections.namedtuple( - 'CFunctionCallExpression', +CFunctionDeclaration = collections.namedtuple( + 'CFunctionDeclaration', [ 'name', - 'arguments', ], ) -CAssignmentStatement = collections.namedtuple( - 'CAssignmentStatement', +# TODO If a function definition doesn't end with an expression, we have issues currently because we try to return statement. +# TODO Closures currently wrap entire defining environment, even symbols that are not used, which makes garbage collection ineffective. +CFunctionDefinition = collections.namedtuple( + 'CFunctionDefinition', [ - 'target', - 'target_symbol_list_index', - 'expression', + 'name', + 'argument_name_list', + 'statement_list', ], ) CProgram = collections.namedtuple( 'CProgram', [ - 'builtins', + 'builtin_set', + 'function_definition_list', + 'operator_declarations', 'statements', 'standard_libraries', + 'string_literal_list', 'symbol_list', ], ) -EQUALITY_LEVEL_TYPE_MAPPING = { - parsing.FurEqualityExpression: CEqualityExpression, - parsing.FurInequalityExpression: CInequalityExpression, - parsing.FurLessThanOrEqualExpression: CLessThanOrEqualExpression, - parsing.FurGreaterThanOrEqualExpression: CGreaterThanOrEqualExpression, - parsing.FurLessThanExpression: CLessThanExpression, - parsing.FurGreaterThanExpression: CGreaterThanExpression, +BUILTINS = { + 'concatenate': [], + 'false': [], + 'pow': ['math.h'], + 'print': ['stdio.h'], + 'true': [], } -def transform_equality_level_expression(builtin_dependencies, symbol_list, expression): - # Transform expressions like 1 < 2 < 3 into expressions like 1 < 2 && 2 < 3 - if type(expression.left) in EQUALITY_LEVEL_TYPE_MAPPING: - left = transform_equality_level_expression( - builtin_dependencies, - symbol_list, - expression.left - ) - - middle = left.right - - right = transform_expression( - builtin_dependencies, - symbol_list, - expression.right, - ) - - # TODO Don't evaluate the middle expression twice - return CAndExpression( - left=left, - right=EQUALITY_LEVEL_TYPE_MAPPING[type(expression)]( - left=middle, - right=right, - ), - ) - - return EQUALITY_LEVEL_TYPE_MAPPING[type(expression)]( - left=transform_expression(builtin_dependencies, symbol_list, expression.left), - right=transform_expression(builtin_dependencies, symbol_list, expression.right), +def transform_variable_expression(accumulators, expression): + assert isinstance(expression, conversion.CPSVariableExpression) + return CVariableExpression(variable=expression.variable) + +def transform_string_literal_expression(accumulators, expression): + value = expression.string + + try: + index = accumulators.string_literal_list.index(value) + except ValueError: + index = len(accumulators.string_literal_list) + accumulators.string_literal_list.append(value) + + return CStringLiteral(index=index, value=value) + +def transform_symbol_expression(accumulators, expression): + if expression.symbol in BUILTINS: + accumulators.builtin_set.add(expression.symbol) + + try: + symbol_list_index = accumulators.symbol_list.index(expression.symbol) + except ValueError: + symbol_list_index = len(accumulators.symbol_list) + accumulators.symbol_list.append(expression.symbol) + + return CSymbolExpression( + symbol=expression.symbol, + symbol_list_index=symbol_list_index, ) -BUILTINS = { - 'false': [], - 'pow': ['math.h'], - 'print': ['stdio.h'], - 'true': [], -} +def transform_integer_literal_expression(accumulators, expression): + return CIntegerLiteral(value=expression.integer) -def transform_expression(builtin_dependencies, symbol_list, expression): - if isinstance(expression, parsing.FurParenthesizedExpression): - # Parentheses can be removed because everything in the C output is explicitly parenthesized - return transform_expression(builtin_dependencies, symbol_list, expression.internal) +CListConstructExpression = collections.namedtuple( + 'CListConstructExpression', + ( + 'allocate', + ), +) - if isinstance(expression, parsing.FurNegationExpression): - return transform_negation_expression(builtin_dependencies, symbol_list, expression) +CLambdaExpression = collections.namedtuple( + 'CLambdaExpression', + ( + 'name', + ), +) - if isinstance(expression, parsing.FurFunctionCallExpression): - return transform_function_call_expression(builtin_dependencies, symbol_list, expression) +CListAppendStatement = collections.namedtuple( + 'CListAppendStatement', + ( + 'list_expression', + 'item_expression', + ), +) - if isinstance(expression, parsing.FurSymbolExpression): - if expression.value in ['true', 'false']: - return CConstantExpression(value=expression.value) +def transform_structure_literal_expression(accumulators, expression): + return CStructureLiteralExpression( + field_count=expression.field_count, + symbol_list_variable=expression.symbol_list_variable, + value_list_variable=expression.value_list_variable, + ) - if expression.value not in symbol_list: - symbol_list.append(expression.value) +def transform_lambda_expression(accumulators, expression): + # TODO This function feels hacky + if len(accumulators.lambda_number_list) == 0: + accumulators.lambda_number_list.append(0) + else: + accumulators.lambda_number_list.append(accumulators.lambda_number_list[-1] + 1) - return CSymbolExpression( - symbol=expression.value, - symbol_list_index=symbol_list.index(expression.value), - ) + name = '__lambda_{}'.format(accumulators.lambda_number_list[-1]) - LITERAL_TYPE_MAPPING = { - parsing.FurIntegerLiteralExpression: CIntegerLiteral, - parsing.FurStringLiteralExpression: CStringLiteral, - } + accumulators.function_definition_list.append(CFunctionDefinition( + name=name, + argument_name_list=expression.argument_name_list, + statement_list=tuple(transform_statement(accumulators, s) for s in expression.statement_list), + )) - if type(expression) in LITERAL_TYPE_MAPPING: - return LITERAL_TYPE_MAPPING[type(expression)](value=expression.value) + return CLambdaExpression(name=name) - if type(expression) in EQUALITY_LEVEL_TYPE_MAPPING: - return transform_equality_level_expression(builtin_dependencies, symbol_list, expression) - INFIX_TYPE_MAPPING = { - parsing.FurAdditionExpression: CAdditionExpression, - parsing.FurSubtractionExpression: CSubtractionExpression, - parsing.FurMultiplicationExpression: CMultiplicationExpression, - parsing.FurIntegerDivisionExpression: CIntegerDivisionExpression, - parsing.FurModularDivisionExpression: CModularDivisionExpression, - } +def transform_list_construct_expression(accumulators, expression): + return CListConstructExpression(allocate=expression.allocate) - return INFIX_TYPE_MAPPING[type(expression)]( - left=transform_expression(builtin_dependencies, symbol_list, expression.left), - right=transform_expression(builtin_dependencies, symbol_list, expression.right), +def transform_list_append_statement(accumulators, expression): + return CListAppendStatement( + list_expression=transform_expression(accumulators, expression.list_expression), + item_expression=transform_expression(accumulators, expression.item_expression), ) -def transform_assignment_statement(builtin_dependencies, symbol_list, assignment_statement): +def transform_expression(accumulators, expression): + return { + conversion.CPSFunctionCallExpression: transform_function_call_expression, + conversion.CPSIntegerLiteralExpression: transform_integer_literal_expression, + conversion.CPSLambdaExpression: transform_lambda_expression, + conversion.CPSListConstructExpression: transform_list_construct_expression, + conversion.CPSStructureLiteralExpression: transform_structure_literal_expression, + conversion.CPSStringLiteralExpression: transform_string_literal_expression, + conversion.CPSSymbolExpression: transform_symbol_expression, + conversion.CPSVariableExpression: transform_variable_expression, + }[type(expression)](accumulators, expression) + +def transform_symbol_assignment_statement(accumulators, assignment_statement): # TODO Check that target is not a builtin - if assignment_statement.target not in symbol_list: - symbol_list.append(assignment_statement.target) + try: + symbol_list_index = accumulators.symbol_list.index(assignment_statement.target) + except ValueError: + symbol_list_index = len(accumulators.symbol_list) + accumulators.symbol_list.append(assignment_statement.target) - return CAssignmentStatement( + return CSymbolAssignmentStatement( target=assignment_statement.target, - target_symbol_list_index=symbol_list.index(assignment_statement.target), + target_symbol_list_index=symbol_list_index, expression=transform_expression( - builtin_dependencies, - symbol_list, + accumulators, assignment_statement.expression, ), ) -def transform_negation_expression(builtin_dependencies, symbol_list, negation_expression): - return CNegationExpression( - value=transform_expression(builtin_dependencies, symbol_list, negation_expression.value), +def transform_function_call_expression(accumulators, function_call): + # TODO Use the symbol from SYMBOL LIST + return CFunctionCallExpression( + metadata=function_call.metadata, + function_expression=transform_expression(accumulators, function_call.function_expression), + argument_count=function_call.argument_count, ) -def transform_function_call_expression(builtin_dependencies, symbol_list, function_call): - if function_call.function.value in BUILTINS.keys(): - # TODO Check that the builtin is actually callable - builtin_dependencies.add(function_call.function.value) +def transform_expression_statement(accumulators, statement): + return CExpressionStatement( + expression=transform_expression(accumulators, statement.expression), + ) + +def transform_if_else_statement(accumulators, statement): + return CIfElseStatement( + condition_expression=transform_expression(accumulators, statement.condition_expression), + if_statement_list=tuple(transform_statement(accumulators, s) for s in statement.if_statement_list), + else_statement_list=tuple(transform_statement(accumulators, s) for s in statement.else_statement_list), + ) - return CFunctionCallExpression( - name='builtin$' + function_call.function.value, - arguments=tuple( - transform_expression(builtin_dependencies, symbol_list, arg) - for arg in function_call.arguments - ), - ) +def transform_array_variable_initialization_statement(accumulators, statement): + return CArrayVariableInitializationStatement( + variable=statement.variable, + items=tuple(transform_expression(accumulators, i) for i in statement.items), + ) - raise Exception() +def transform_symbol_array_variable_initialization_statement(accumulators, statement): + symbol_list_indices = [] -def transform_statement(builtin_dependencies, symbol_list, statement): + for symbol in statement.symbol_list: + try: + symbol_list_index = accumulators.symbol_list.index(symbol) + except ValueError: + symbol_list_index = len(accumulators.symbol_list) + accumulators.symbol_list.append(symbol) + + symbol_list_indices.append(symbol_list_index) + + return CSymbolArrayVariableInitializationStatement( + variable=statement.variable, + symbol_list=statement.symbol_list, + symbol_list_indices=tuple(symbol_list_indices), + ) + +def transform_variable_initialization_statement(accumulators, statement): + return CVariableInitializationStatement( + variable=statement.variable, + expression=transform_expression(accumulators, statement.expression), + ) + +def transform_variable_reassignment_statement(accumulators, statement): + return CVariableReassignmentStatement( + variable=statement.variable, + expression=transform_expression(accumulators, statement.expression), + ) + +def transform_function_definition_statement(accumulators, statement): + # TODO Allow defining the same function in different contexts + if any(fd.name == statement.name for fd in accumulators.function_definition_list): + raise Exception('A function with name "{}" already exists'.format(statement.name)) + + # TODO Add argument names to the symbol table + accumulators.function_definition_list.append(CFunctionDefinition( + name=statement.name, + argument_name_list=statement.argument_name_list, + statement_list=tuple(transform_statement(accumulators, s) for s in statement.statement_list) + )) + + return CFunctionDeclaration(name=statement.name) + +def transform_push_statement(accumulators, statement): + return CPushStatement(expression=transform_expression(accumulators, statement.expression)) + +def transform_statement(accumulators, statement): return { - parsing.FurAssignmentStatement: transform_assignment_statement, - parsing.FurFunctionCallExpression: transform_function_call_expression, - }[type(statement)](builtin_dependencies, symbol_list, statement) + conversion.CPSArrayVariableInitializationStatement: transform_array_variable_initialization_statement, + conversion.CPSAssignmentStatement: transform_symbol_assignment_statement, + conversion.CPSExpressionStatement: transform_expression_statement, + conversion.CPSFunctionDefinitionStatement: transform_function_definition_statement, + conversion.CPSIfElseStatement: transform_if_else_statement, + conversion.CPSListAppendStatement: transform_list_append_statement, + conversion.CPSPushStatement: transform_push_statement, + conversion.CPSSymbolArrayVariableInitializationStatement: transform_symbol_array_variable_initialization_statement, + conversion.CPSVariableInitializationStatement: transform_variable_initialization_statement, + conversion.CPSVariableReassignmentStatement: transform_variable_reassignment_statement, + }[type(statement)](accumulators, statement) + + +Accumulators = collections.namedtuple( + 'Accumulators', + [ + 'builtin_set', + 'function_definition_list', + 'lambda_number_list', + 'operator_set', + 'symbol_list', + 'string_literal_list', + ], +) def transform(program): - builtins = set() - symbol_list = [] + accumulators = Accumulators( + builtin_set=set(), + function_definition_list=[], + lambda_number_list=[], + operator_set=set(), + symbol_list=[], + string_literal_list=[], + ) - c_statements = [ - transform_statement(builtins, symbol_list, statement) for statement in program.statement_list + statement_list = [ + transform_statement(accumulators, statement) for statement in program.statement_list ] - standard_libraries = set() - for builtin in builtins: + standard_library_set = set() + for builtin in accumulators.builtin_set: for standard_library in BUILTINS[builtin]: - standard_libraries.add(standard_library) + standard_library_set.add(standard_library) return CProgram( - builtins=builtins, - statements=c_statements, - standard_libraries=standard_libraries, - symbol_list=symbol_list, + builtin_set=accumulators.builtin_set, + function_definition_list=accumulators.function_definition_list, + operator_declarations=tuple(sorted(accumulators.operator_set)), + statements=statement_list, + standard_libraries=standard_library_set, + string_literal_list=accumulators.string_literal_list, + symbol_list=accumulators.symbol_list, )