Remove some disabled code

diff --git a/orc/orccompiler.c b/orc/orccompiler.c
index 9b37b63..972567c 100644 (file)
--- a/orc/orccompiler.c
+++ b/orc/orccompiler.c
@@ -382,21 +382,6 @@ orc_compiler_dup_temporary (OrcCompiler *compiler, int var, int j)
   return i;
 }
 
-#if 0
-void
-orc_compiler_dump_code (OrcCompiler *compiler)
-{
-  FILE *file;
-  int n;
-
-  file = fopen("dump","w");
-
-  n = fwrite (compiler->code, 1, compiler->codeptr - compiler->code, file);
-  fclose (file);
-}
-
-#endif
-
 void
 orc_compiler_dump_asm (OrcCompiler *compiler)
 {

diff --git a/orc/orcprogram-arm.c b/orc/orcprogram-arm.c
index 970eaa7..3b6f7b4 100644 (file)
--- a/orc/orcprogram-arm.c
+++ b/orc/orcprogram-arm.c
@@ -42,18 +42,6 @@ arm_emit_prologue (OrcCompiler *compiler)
   }
   if (regs) arm_emit_push (compiler, regs);
 
-#if 0
-  arm_emit_mov_memoffset_reg (compiler, 4, 8, X86_ESP, X86_EBP);
-  if (compiler->used_regs[X86_EDI]) {
-    arm_emit_push (compiler, 4, X86_EDI);
-  }
-  if (compiler->used_regs[X86_ESI]) {
-    arm_emit_push (compiler, 4, X86_ESI);
-  }
-  if (compiler->used_regs[X86_EBX]) {
-    arm_emit_push (compiler, 4, X86_EBX);
-  }
-#endif
 }
 
 void

diff --git a/orc/orcprogram-c.c b/orc/orcprogram-c.c
index ba40604..2382e1c 100644 (file)
--- a/orc/orcprogram-c.c
+++ b/orc/orcprogram-c.c
@@ -170,19 +170,6 @@ c_get_type_name (int size)
 }
 
 
-#if 0
-static void
-c_rule_copyw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  char dest[20], src1[20];
-
-  c_get_name (dest, p, insn->args[0]);
-  c_get_name (src1, p, insn->args[1]);
-
-  ORC_ASM_CODE(p,"    %s = %s;\n", dest, src1);
-}
-#endif
-
 #define BINARY(name,op) \
 static void \
 c_rule_ ## name (OrcCompiler *p, void *user, OrcInstruction *insn) \
@@ -213,18 +200,6 @@ c_rule_ ## name (OrcCompiler *p, void *user, OrcInstruction *insn) \
 #define BINARY_LW(a,b) BINARY(a,b)
 #define BINARY_WB(a,b) BINARY(a,b)
 
-#if 0
-//UNNARY(absw, src1 + src2)
-BINARY(addw, src1 + src2)
-BINARY(addssw, CLAMP(src1 + src2, ORC_SB_MIN,ORC_SB_MAX))
-BINARY(addusw, CLAMP(src1 + src2, 0,ORC_UB_MAX))
-BINARY(subw, src1 - src2)
-BINARY(mullw, src1 * src2)
-BINARY(mulhw, (src1 * src2)>>16)
-BINARY(shlw, src1 << src2)
-BINARY(shrsw, src1 >> src2)
-#endif
-
 #include "opcodes.h"
 
 #undef BINARY_SB
@@ -245,69 +220,6 @@ BINARY(shrsw, src1 >> src2)
 #undef BINARY_WB
 
 
-#if 0
-static void
-c_rule_addw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  char dest[20], src1[20], src2[20];
-
-  c_get_name (dest, p, insn->args[0]);
-  c_get_name (src1, p, insn->args[1]);
-  c_get_name (src2, p, insn->args[2]);
-
-  ORC_ASM_CODE(p,"    %s = %s + %s;\n", dest, src1, src2);
-}
-
-static void
-c_rule_subw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  char dest[20], src1[20], src2[20];
-
-  c_get_name (dest, p, insn->args[0]);
-  c_get_name (src1, p, insn->args[1]);
-  c_get_name (src2, p, insn->args[2]);
-
-  ORC_ASM_CODE(p,"    %s = %s - %s;\n", dest, src1, src2);
-}
-
-static void
-c_rule_mullw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  char dest[20], src1[20], src2[20];
-
-  c_get_name (dest, p, insn->args[0]);
-  c_get_name (src1, p, insn->args[1]);
-  c_get_name (src2, p, insn->args[2]);
-
-  ORC_ASM_CODE(p,"    %s = %s * %s;\n", dest, src1, src2);
-}
-
-static void
-c_rule_shlw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  char dest[20], src1[20], src2[20];
-
-  c_get_name (dest, p, insn->args[0]);
-  c_get_name (src1, p, insn->args[1]);
-  c_get_name (src2, p, insn->args[2]);
-
-  ORC_ASM_CODE(p,"    %s = %s << %s;\n", dest, src1, src2);
-}
-
-static void
-c_rule_shrsw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  char dest[20], src1[20], src2[20];
-
-  c_get_name (dest, p, insn->args[0]);
-  c_get_name (src1, p, insn->args[1]);
-  c_get_name (src2, p, insn->args[2]);
-
-  ORC_ASM_CODE(p,"    %s = %s >> %s;\n", dest, src1, src2);
-}
-#endif
-
-
 void
 orc_c_init (void)
 {
@@ -330,14 +242,5 @@ orc_c_init (void)
 
 #include "opcodes.h"
 
-#if 0
-  orc_rule_register ("copyw", ORC_TARGET_C, c_rule_copyw, NULL);
-  orc_rule_register ("addw", ORC_TARGET_C, c_rule_addw, NULL);
-  orc_rule_register ("subw", ORC_TARGET_C, c_rule_subw, NULL);
-  orc_rule_register ("mulw", ORC_TARGET_C, c_rule_mullw, NULL);
-  //orc_rule_register ("mulhw", ORC_TARGET_C, c_rule_mulhw, NULL);
-  orc_rule_register ("shlw", ORC_TARGET_C, c_rule_shlw, NULL);
-  orc_rule_register ("shrsw", ORC_TARGET_C, c_rule_shrsw, NULL);
-#endif
 }
 

diff --git a/orc/orcprogram.h b/orc/orcprogram.h
index a918ebd..5348d9b 100644 (file)
--- a/orc/orcprogram.h
+++ b/orc/orcprogram.h
@@ -179,28 +179,6 @@ struct _OrcProgram {
   unsigned char *code;
   void *code_exec;
   int code_size;
-  
-#if 0
-  OrcInstruction *insn;
-
-  OrcRegister registers[ORC_N_REGISTERS];
-  int n_regs;
-
-  OrcFixup fixups[ORC_N_FIXUPS];
-  int n_fixups;
-  unsigned char *labels[ORC_N_LABELS];
-
-  int error;
-
-  int valid_regs[ORC_N_REGS];
-  int save_regs[ORC_N_REGS];
-  int used_regs[ORC_N_REGS];
-  int alloc_regs[ORC_N_REGS];
-
-  int loop_shift;
-  int long_jumps;
-#endif
-
 };
 
 struct _OrcCompiler {
@@ -219,11 +197,6 @@ struct _OrcCompiler {
   int n_regs;
 
   unsigned char *codeptr;
-#if 0
-  unsigned char *code;
-  void *code_exec;
-  int code_size;
-#endif
   
   OrcFixup fixups[ORC_N_FIXUPS];
   int n_fixups;

diff --git a/orc/orcrules-sse.c b/orc/orcrules-sse.c
index 8964fb5..92df073 100644 (file)
--- a/orc/orcrules-sse.c
+++ b/orc/orcrules-sse.c
@@ -136,26 +136,6 @@ sse_emit_66_rex_0f (OrcCompiler *p, OrcInstruction *insn, int code,
       p->vars[insn->args[0]].alloc);
 }
 
-#if 0
-static void
-sse_rule_addw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  sse_emit_66_rex_0f (p, insn, 0xfd, "paddw");
-}
-
-static void
-sse_rule_subw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  sse_emit_66_rex_0f (p, insn, 0xf9, "psubw");
-}
-
-static void
-sse_rule_mullw (OrcCompiler *p, void *user, OrcInstruction *insn)
-{
-  sse_emit_66_rex_0f (p, insn, 0xd5, "pmullw");
-}
-#endif
-
 #define UNARY(opcode,insn_name,code) \
 static void \
 sse_rule_ ## opcode (OrcCompiler *p, void *user, OrcInstruction *insn) \