be: remove remnants of machine description

[libfirm] / ir / be / sparc / bearch_sparc.c

diff --git a/ir/be/sparc/bearch_sparc.c b/ir/be/sparc/bearch_sparc.c
index a4c86ef..078fdfa 100644 (file)
--- a/ir/be/sparc/bearch_sparc.c
+++ b/ir/be/sparc/bearch_sparc.c
@@ -21,7 +21,6 @@
  * @file
  * @brief    The main sparc backend driver file.
  * @author   Hannes Rapp, Matthias Braun
- * @version  $Id$
  */
 #include "config.h"
 
@@ -57,7 +56,6 @@
 #include "belower.h"
 #include "besched.h"
 #include "be.h"
-#include "bemachine.h"
 #include "bemodule.h"
 #include "beirg.h"
 #include "begnuas.h"
@@ -352,7 +350,7 @@ static void sparc_handle_intrinsics(void)
 /**
  * Initializes the backend ISA
  */
-static arch_env_t *sparc_init(FILE *outfile)
+static arch_env_t *sparc_init(const be_main_env_t *env)
 {
        sparc_isa_t *isa = XMALLOC(sparc_isa_t);
        *isa = sparc_isa_template;
@@ -362,13 +360,14 @@ static arch_env_t *sparc_init(FILE *outfile)
        be_gas_object_file_format = OBJECT_FILE_FORMAT_ELF;
        be_gas_elf_variant        = ELF_VARIANT_SPARC;
 
-       be_emit_init(outfile);
-
        sparc_register_init();
        sparc_create_opcodes(&sparc_irn_ops);
        sparc_handle_intrinsics();
        sparc_cconv_init();
 
+       be_emit_init(env->file_handle);
+       be_gas_begin_compilation_unit(env);
+
        return &isa->base;
 }
 
@@ -380,37 +379,13 @@ static void sparc_done(void *self)
        sparc_isa_t *isa = (sparc_isa_t*)self;
 
        /* emit now all global declarations */
-       be_gas_emit_decls(isa->base.main_env);
+       be_gas_end_compilation_unit(isa->base.main_env);
 
        pmap_destroy(isa->constants);
        be_emit_exit();
        free(isa);
 }
 
-
-/**
- * Get the register class which shall be used to store a value of a given mode.
- * @param self The this pointer.
- * @param mode The mode in question.
- * @return A register class which can hold values of the given mode.
- */
-static const arch_register_class_t *sparc_get_reg_class_for_mode(const ir_mode *mode)
-{
-       if (mode_is_float(mode))
-               return &sparc_reg_classes[CLASS_sparc_fp];
-       else
-               return &sparc_reg_classes[CLASS_sparc_gp];
-}
-
-/**
- * Returns the necessary byte alignment for storing a register of given class.
- */
-static int sparc_get_reg_class_alignment(const arch_register_class_t *cls)
-{
-       ir_mode *mode = arch_register_class_mode(cls);
-       return get_mode_size_bytes(mode);
-}
-
 static void sparc_lower_for_target(void)
 {
        size_t i, n_irgs = get_irp_n_irgs();
@@ -435,7 +410,7 @@ static void sparc_lower_for_target(void)
                ir_graph *irg = get_irp_irg(i);
                ir_lower_mode_b(irg, mode_Iu);
                lower_switch(irg, 4, 256, false);
-               lower_alloc(irg, SPARC_STACK_ALIGNMENT, false, -SPARC_MIN_STACKSIZE);
+               lower_alloc(irg, SPARC_STACK_ALIGNMENT, false, SPARC_MIN_STACKSIZE);
        }
 }
 
@@ -479,12 +454,10 @@ static const backend_params *sparc_get_backend_params(void)
        };
 
        ir_mode *mode_long_long
-               = new_ir_mode("long long", irms_int_number, 64, 1, irma_twos_complement,
-                             64);
+               = new_int_mode("long long", irma_twos_complement, 64, 1, 64);
        ir_type *type_long_long = new_type_primitive(mode_long_long);
        ir_mode *mode_unsigned_long_long
-               = new_ir_mode("unsigned long long", irms_int_number, 64, 0,
-                             irma_twos_complement, 64);
+               = new_int_mode("unsigned long long", irma_twos_complement, 64, 0, 64);
        ir_type *type_unsigned_long_long
                = new_type_primitive(mode_unsigned_long_long);
 
@@ -495,25 +468,15 @@ static const backend_params *sparc_get_backend_params(void)
                p.mode_float_arithmetic = NULL;
                p.type_long_double      = NULL;
        } else {
-               ir_mode *mode_long_double
-                       = new_ir_mode("long double", irms_float_number, 128, 1,
-                                                 irma_ieee754, 0);
-               ir_type *type_long_double = new_type_primitive(mode_long_double);
+               ir_type *type_long_double = new_type_primitive(mode_Q);
 
                set_type_alignment_bytes(type_long_double, 8);
-               p.type_long_double        = type_long_double;
+               set_type_size_bytes(type_long_double, 16);
+               p.type_long_double = type_long_double;
        }
        return &p;
 }
 
-static ir_graph **sparc_get_backend_irg_list(const void *self,
-                                             ir_graph ***irgs)
-{
-       (void) self;
-       (void) irgs;
-       return NULL;
-}
-
 static asm_constraint_flags_t sparc_parse_asm_constraint(const char **c)
 {
        (void) c;
@@ -589,11 +552,8 @@ const arch_isa_if_t sparc_isa_if = {
        sparc_lower_for_target,
        sparc_done,
        NULL,                /* handle intrinsics */
-       sparc_get_reg_class_for_mode,
        NULL,
-       sparc_get_reg_class_alignment,
        sparc_get_backend_params,
-       sparc_get_backend_irg_list,
        NULL,                    /* mark remat */
        sparc_parse_asm_constraint,
        sparc_is_valid_clobber,