From 425294c53560c6c7f0055dc5d248a251e7f461c1 Mon Sep 17 00:00:00 2001 From: johanknol Date: Sat, 16 Sep 2000 12:58:16 +0000 Subject: [PATCH] temporary fix for fp support git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@364 4a8a32a2-be11-0410-ad9d-d568d2c75423 --- src/ds390/gen.c | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/ds390/gen.c b/src/ds390/gen.c index f24f651f..1c12a31e 100644 --- a/src/ds390/gen.c +++ b/src/ds390/gen.c @@ -3309,6 +3309,7 @@ static void genDivbits (operand *left, MOVA(l); + emitcode("clr","c"); //jwk emitcode("div","ab"); emitcode("rrc","a"); aopPut(AOP(result),"c",0); @@ -3334,6 +3335,7 @@ static void genDivOneByte (operand *left, emitcode("mov","b,%s", aopGet(AOP(right),0,FALSE,FALSE)); l = aopGet(AOP(left),0,FALSE,FALSE); MOVA(l); + emitcode("clr","c"); //jwk emitcode("div","ab"); aopPut(AOP(result),"a",0); while (size--) @@ -3370,6 +3372,7 @@ static void genDivOneByte (operand *left, emitcode("","%05d$:",(lbl->key+100)); /* now the division */ + emitcode("clr","c"); //jwk emitcode("div","ab"); /* we are interested in the lower order only */ @@ -3455,6 +3458,7 @@ static void genModbits (operand *left, MOVA(l); + emitcode("clr","c"); //jwk emitcode("div","ab"); emitcode("mov","a,b"); emitcode("rrc","a"); @@ -3478,6 +3482,7 @@ static void genModOneByte (operand *left, emitcode("mov","b,%s", aopGet(AOP(right),0,FALSE,FALSE)); l = aopGet(AOP(left),0,FALSE,FALSE); MOVA(l); + emitcode("clr","c"); //jwk emitcode("div","ab"); aopPut(AOP(result),"b",0); return ; @@ -3514,6 +3519,7 @@ static void genModOneByte (operand *left, emitcode("","%05d$:",(lbl->key+100)); /* now the multiplication */ + emitcode("clr","c"); //jwk emitcode("div","ab"); /* we are interested in the lower order only */ -- 2.47.2