X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=codea%2Fchelper.c;h=015e7a35244bfd13de60e33cd2f4584737f642f9;hb=c2a8a36f40f5dd2bdb26b07c4f9fc61801abbe3d;hp=be39f3f3314e3efb312a8bf608e508f29396021c;hpb=777a3cb3a801b3ab86e9a77fe045676ed498e350;p=uebersetzerbau-ss10.git

diff --git a/codea/chelper.c b/codea/chelper.c
index be39f3f..015e7a3 100644
--- a/codea/chelper.c
+++ b/codea/chelper.c
@@ -1,12 +1,17 @@
 #include <stdio.h>
 #include <string.h>
+#include <stdlib.h>
 #include "chelper.h"
 #include "tree.h"
 
-#if 1
+#if 0
 #define DDCHELP
 #endif
 
+#define REGLEN 4
+static char *regs64[] = {"rax", "r10", "r11", "r9"};
+static char *regs8l[] = {"al", "r10b", "r11b", "r9b"};
+
 void func_header(char *s)
 {
 	printf("\t.globl %1$s\n\t.type %1$s, @function\n%1$s:\n", s);
@@ -27,35 +32,36 @@ void move(char *src, char *dst)
 void moveimm(long imm, char *dst)
 {
 	char buf[100];
-	sprintf(buf, "$%li", imm);
+	sprintf(buf, "$%d", imm);
 	printf("\tmovq %s, %%%s\n", buf, dst);
 }
 
-void ret(void)
-{
-	printf("\tret\n");
-}
-
-char *next_reg(char *s, short skip)
+char *next_reg(char *s, int params)
 {
-	/* TODO: warum enthaelt das register die parameter enthalten koennten? */
-	char *regs[] = {"rax", "r10", "r11", "r9", "r8", "rcx", "rdx", "rsi", "rdi"};
-	int i=0;
+	int i = 0;
 	if (s != (char*) NULL) {
-		while(i < 9) {
-			if(!strcmp(s, regs[i++])) {
-				break;
-			}
+		while(strcmp(s, regs64[i]) != 0) {
+			i = (i+1) % REGLEN;
 		}
-	}
-	if(skip) {
-		i++;
+		i = (i+1) % REGLEN;
 	}
 #ifdef DDCHELP
-	fprintf(stderr, "next_reg(): %s\n", regs[i]);
+	fprintf(stderr, "next_reg(): %s (bei %i parameter)\n", regs64[i], params);
 #endif
+	return regs64[i];
+}
 
-	return regs[i];
+char *reg_64to8l(char *s)
+{
+	int i = 0;
+	if (s != (char*) NULL) {
+		while(strcmp(s, regs64[i]) != 0) {
+			i = (i+1) % REGLEN;
+		}
+		return regs8l[i];
+	}
+	fprintf(stderr, "reg_64to8l(): sollte nicht passieren\n");
+	exit(4);
 }
 
 char *param_reg(int num)