move lots of source files around to match their actual placement in the original treemain

1 files changed, 0 insertions, 393 deletions

diff --git a/compiler_and_linker/unsorted/FuncLevelAsmPPC.c b/compiler_and_linker/unsorted/FuncLevelAsmPPC.c
deleted file mode 100644
index 27528b8..0000000
--- a/compiler_and_linker/unsorted/FuncLevelAsmPPC.c
+++ /dev/null
@@ -1,393 +0,0 @@
-#include "compiler/FuncLevelAsmPPC.h"
-#include "compiler/CCompiler.h"
-#include "compiler/CError.h"
-#include "compiler/CFunc.h"
-#include "compiler/CMangler.h"
-#include "compiler/CParser.h"
-#include "compiler/CPrepTokenizer.h"
-#include "compiler/CodeGen.h"
-#include "compiler/Coloring.h"
-#include "compiler/CompilerTools.h"
-#include "compiler/uDump.h"
-#include "compiler/InlineAsmPPC.h"
-#include "compiler/InlineAsmRegisters.h"
-#include "compiler/ObjGenMachO.h"
-#include "compiler/PCode.h"
-#include "compiler/PCodeAssembly.h"
-#include "compiler/PCodeListing.h"
-#include "compiler/PCodeUtilities.h"
-#include "compiler/PPCError.h"
-#include "compiler/RegisterInfo.h"
-#include "compiler/StackFrame.h"
-#include "compiler/TOC.h"
-#include "compiler/objects.h"
-
-static EntryPoint *entrypoints_head;
-static EntryPoint **entrypoints_tail;
-
-void setup_assembly_argument(Object *obj, short reg) {
-    VarInfo *vi;
-    Type *type;
-
-    vi = Registers_GetVarInfo(obj);
-    type = obj->type;
-    vi->used = 1;
-
-    if (!requires_frame) {
-        if (is_register_object(obj)) {
-            if (!reg)
-                CError_Error(CErrorStr263, obj->name->name);
-
-            if (TYPE_IS_8BYTES(type)) {
-                short regLo;
-                short regHi;
-                if (reg < 10) {
-                    if (copts.littleendian) {
-                        regLo = reg;
-                        regHi = reg + 1;
-                    } else {
-                        regLo = reg + 1;
-                        regHi = reg;
-                    }
-                    retain_GPR_pair(obj, regLo, regHi);
-                    InlineAsm_InsertRegister(obj->name->name, RegClass_GPR, regLo, obj);
-                }
-            } else if (IS_TYPE_FLOAT(type)) {
-                retain_register(obj, RegClass_FPR, reg);
-                InlineAsm_InsertRegister(obj->name->name, RegClass_FPR, reg, obj);
-            } else if (IS_TYPE_VECTOR(type)) {
-                retain_register(obj, RegClass_VR, reg);
-                InlineAsm_InsertRegister(obj->name->name, RegClass_VR, reg, obj);
-            } else {
-                retain_register(obj, RegClass_GPR, reg);
-                InlineAsm_InsertRegister(obj->name->name, RegClass_GPR, reg, obj);
-            }
-        }
-    } else {
-        if (is_register_object(obj)) {
-            vi = Registers_GetVarInfo(obj);
-            if (!vi->reg) {
-                assign_register_by_type(obj);
-                if (!(vi->flags & VarInfoFlag2))
-                    CError_Error(CErrorStr263, obj->name->name);
-                else
-                    InlineAsm_InsertRegister(obj->name->name, vi->rclass, vi->reg, obj);
-            }
-        }
-    }
-}
-
-void assign_local_addresses(void) {
-    VarInfo *vi;
-    ObjectList *list;
-    Object *object;
-
-    for (list = locals; list; list = list->next) {
-        vi = CodeGen_GetNewVarInfo();
-        list->object->u.var.info = vi;
-        list->object->flags |= OBJECT_USED;
-        vi->used = 1;
-    }
-
-    for (list = locals; list; list = list->next) {
-        object = list->object;
-        if (is_register_object(object)) {
-            vi = Registers_GetVarInfo(object);
-            if (!vi->reg) {
-                assign_register_by_type(object);
-                if (!(vi->flags & VarInfoFlag2))
-                    CError_Error(CErrorStr263, object->name->name);
-                else
-                    InlineAsm_InsertRegister(object->name->name, vi->rclass, vi->reg, object);
-            }
-        }
-    }
-
-    for (list = locals; list; list = list->next) {
-        object = list->object;
-        if (OBJECT_REG(object) == 0)
-            assign_local_memory(object);
-    }
-}
-
-static void FuncAsm_PreScanDirectives(void) {
-    SInt32 directive;
-    Boolean save_eoltokens;
-
-    in_assembler = 1;
-    save_eoltokens = cprep_eoltokens;
-    cprep_eoltokens = 1;
-
-    if (setjmp(InlineAsm_assemblererror) == 0) {
-        while (tk == TK_IDENTIFIER && (directive = InlineAsm_IsDirective(AssemblerType_1))) {
-            InlineAsm_ProcessDirective(directive);
-
-            if (tk == ';' || tk == TK_EOL) {
-                CPrep_TokenStreamFlush();
-                tk = lex();
-            } else {
-                InlineAsm_SyntaxError(CErrorStr113);
-            }
-
-            if (directive == IADirective_FrAlloc) {
-                requires_frame = 1;
-                break;
-            } else if (directive == IADirective_NoFrAlloc) {
-                user_responsible_for_frame = 1;
-                break;
-            }
-        }
-    }
-
-    in_assembler = 0;
-    cprep_eoltokens = save_eoltokens;
-}
-
-static void FuncAsm_AddEntryPoint(Statement *stmt, PCodeBlock *block) {
-    EntryPoint *ep;
-    IAEntryPoint *ia_ep;
-
-    ia_ep = (IAEntryPoint *) stmt->expr;
-    ep = lalloc(sizeof(EntryPoint));
-    memclrw(ep, sizeof(EntryPoint));
-
-    ep->object = ia_ep->x8;
-    ep->block = block;
-
-    *entrypoints_tail = ep;
-    entrypoints_tail = &ep->next;
-
-    block->flags |= fPCBlockFlag8000;
-}
-
-void Assembler(Object *func) {
-    PCodeBlock *block;
-    Statement *stmt;
-    Boolean flag17;
-    Boolean flag16;
-    char *name;
-    InlineAsm *ia;
-    Boolean save_unusedvar;
-    Boolean save_unusedarg;
-
-    flag17 = 0;
-    flag16 = 0;
-
-    init_endian();
-    init_stack_globals(func);
-    memclrw(asm_alloc_flags, sizeof(asm_alloc_flags));
-    fralloc_parameter_area_size = 0;
-    user_responsible_for_frame = 0;
-    assembledinstructions = 0;
-
-    entrypoints_head = NULL;
-    entrypoints_tail = &entrypoints_head;
-
-    stmt = curstmt;
-
-    if (func && func->name)
-        PrintProgressFunction(func->name->name);
-
-    CodeGen_InitialSanityCheck();
-
-    if (func->qual & Q_INLINE)
-        PPCError_Warning(PPCErrorStr173);
-
-    CheckCLabels();
-
-    if (fatalerrors)
-        return;
-
-    if (copts.filesyminfo)
-        CPrep_SetSourceFile(&cparser_fileoffset);
-
-    sm_section = SECT_TEXT;
-
-    initpcode();
-
-    pclabel(prologue = makepcblock(), makepclabel());
-    pclabel(block = makepcblock(), makepclabel());
-    pcbranch(prologue, block->labels);
-
-    resetTOCvarinfo();
-    InlineAsm_InitializePPC();
-    FuncAsm_PreScanDirectives();
-
-    disable_optimizer = 1;
-
-    init_registers();
-    assign_arguments_to_memory(func, 0, 0);
-    init_frame_sizes(0);
-
-    if (copts.debuglisting)
-        DumpIR(stmt, func);
-
-    cprep_eoltokens = 1;
-    in_assembler = 1;
-
-    save_unusedvar = copts.warn_unusedvar;
-    save_unusedarg = copts.warn_unusedarg;
-    copts.warn_unusedvar = 0;
-    copts.warn_unusedarg = 0;
-
-    InlineAsm_ScanFunction('}');
-
-    expandTOCreferences(&stmt->next);
-
-    if (!anyerrors && copts.debuglisting)
-        DumpIR(stmt, func);
-
-    in_assembler = 0;
-    cprep_eoltokens = 0;
-
-    name = CMangler_GetLinkName(func)->name;
-    func->flags |= OBJECT_DEFINED;
-
-    if (fralloc_parameter_area_size)
-        update_out_param_size(fralloc_parameter_area_size);
-    if (!user_responsible_for_frame)
-        process_arguments(move_assigned_argument, 0);
-
-    branch_label(makepclabel());
-    assign_labels(stmt->next);
-
-    copts.warn_unusedvar = save_unusedvar;
-    copts.warn_unusedarg = save_unusedarg;
-
-    for (stmt = stmt->next; stmt; stmt = stmt->next) {
-        current_statement = stmt;
-        switch (stmt->type) {
-            case ST_ASM:
-                if ((ia = (InlineAsm *) stmt->expr)) {
-                    if (ia->flags & IAFlag1) {
-                        if (ia->opcode == IADirective_Entry) {
-                            branch_label(makepclabel());
-                            FuncAsm_AddEntryPoint(stmt, pclastblock);
-                        } else if (ia->opcode == IADirective_FrFree) {
-                            if (flag16)
-                                PPCError_Error(PPCErrorStr188);
-                            else
-                                flag16 = 1;
-
-                            asm_alloc_flags[3] = 1;
-                            asm_alloc_flags[4] = 1;
-                            branch_label(makepclabel());
-
-                            epilogue = pclastblock;
-                            pclastblock->flags |= fIsEpilogue;
-
-                            CheckCLabels();
-                            if (fatalerrors)
-                                return;
-
-                            pccomputepredecessors();
-                            if (copts.debuglisting)
-                                pclistblocks(name, "[FUNCTION-LEVEL ASM] INITIAL CODE");
-                            colorinstructions(func);
-                            if (copts.debuglisting)
-                                pclistblocks(name, "[FUNCTION-LEVEL ASM] AFTER REGISTER COLORING");
-                            compute_frame_sizes();
-                            generate_prologue(prologue, 0);
-                            epilogue = pclastblock;
-                            generate_epilogue(epilogue, 0);
-                            if (copts.debuglisting)
-                                pclistblocks(name, "[FUNCTION-LEVEL ASM] AFTER PROLOGUE/EPILOGUE CREATION");
-
-                            flag17 = 1;
-                        }
-                    } else {
-                        branch_label(makepclabel());
-                        asm_alloc_flags[6] = 0;
-                        asm_alloc_flags[7] = 0;
-                        InlineAsm_TranslateIRtoPCode(stmt);
-                        asm_alloc_flags[4] = 0;
-                    }
-                }
-                break;
-            case ST_LABEL:
-                if (!stmt->label->pclabel->resolved)
-                    branch_label(stmt->label->pclabel);
-                break;
-            default:
-                CError_FATAL(525);
-        }
-    }
-
-    current_statement = NULL;
-
-    if (fatalerrors)
-        return;
-    CheckCLabels();
-    if (fatalerrors)
-        return;
-
-    if (!flag17) {
-        branch_label(makepclabel());
-
-        epilogue = pclastblock;
-        pclastblock->flags |= fIsEpilogue;
-
-        pccomputepredecessors();
-        if (copts.debuglisting)
-            pclistblocks(name, "[FUNCTION-LEVEL ASM] INITIAL CODE");
-
-        if (!asm_alloc_flags[1]) {
-            colorinstructions(func);
-            if (fatalerrors)
-                return;
-
-            if (copts.debuglisting)
-                pclistblocks(name, "[FUNCTION-LEVEL ASM] AFTER REGISTER COLORING");
-        }
-
-        compute_frame_sizes();
-        if (asm_alloc_flags[1])
-            no_frame_for_asm();
-
-        if (fatalerrors)
-            return;
-
-        if (!asm_alloc_flags[1]) {
-            generate_prologue(prologue, 0);
-            generate_epilogue(epilogue, !asm_alloc_flags[6] && !asm_alloc_flags[7]);
-        }
-
-        if (copts.debuglisting)
-            pclistblocks(name, "[FUNCTION-LEVEL ASM] AFTER PROLOGUE/EPILOGUE CREATION");
-    }
-
-    if (fatalerrors)
-        return;
-
-    if (!asm_alloc_flags[1] && needs_frame()) {
-        if (asm_alloc_flags[3]) {
-            if (!asm_alloc_flags[5] || !asm_alloc_flags[6])
-                PPCError_Warning(PPCErrorStr187, "blr");
-            if (asm_alloc_flags[8])
-                PPCError_Warning(PPCErrorStr186);
-        } else {
-            PPCError_Warning(PPCErrorStr185, "blr");
-        }
-    }
-
-    func->section = sm_section;
-
-    if (copts.filesyminfo)
-        symdeclend = CPrep_GetFileOffsetInfo(&cparser_fileoffset);
-
-    copts.peephole = 0;
-    if (pic_base_label)
-        pic_base_pcodelabel = pic_base_label->pclabel;
-    assemblefunction(func, entrypoints_head);
-
-    if (copts.debuglisting)
-        pclistblocks(CMangler_GetLinkName(func)->name, "[FUNCTION-LEVEL ASM] FINAL CODE");
-
-    CFunc_WarnUnused();
-}
-
-void SetupAssembler(void) {
-}
-
-void CleanupAssembler(void) {
-}