Mercurial > hg > CbC > old > device
comparison mc-code-powerpc.c @ 187:dffcccf8b1cb
nested COND
author | kono |
---|---|
date | Mon, 01 Dec 2003 19:06:30 +0900 (2003-12-01) |
parents | 6391432ca002 |
children | f53d70110377 |
comparison
equal
deleted
inserted
replaced
186:6391432ca002 | 187:dffcccf8b1cb |
---|---|
1997 } else { | 1997 } else { |
1998 set_creg(RET_REGISTER,mode); | 1998 set_creg(RET_REGISTER,mode); |
1999 } | 1999 } |
2000 } | 2000 } |
2001 | 2001 |
2002 void | 2002 int |
2003 code_set_fixed_creg(int mode,int type) { | 2003 code_get_fixed_creg(int reg,int type) { |
2004 return creg; | |
2005 } | |
2006 | |
2007 void | |
2008 code_set_fixed_creg(int reg,int mode,int type) { | |
2004 if (type==FLOAT||type==DOUBLE) { | 2009 if (type==FLOAT||type==DOUBLE) { |
2005 if (cond_freg== -1) { | 2010 set_freg(reg,mode); |
2006 cond_freg = get_dregister_var(0,1); | |
2007 if(car(cond_freg)!=DREGISTER) error(-1); | |
2008 } | |
2009 set_freg(cadr(cond_freg),mode); | |
2010 } else { | 2011 } else { |
2011 if (cond_reg== -1) { | 2012 set_creg(reg,mode); |
2012 cond_reg = get_register_var(0); | |
2013 if(car(cond_reg)!=REGISTER) error(-1); | |
2014 } | |
2015 set_creg(cadr(cond_reg),mode); | |
2016 } | 2013 } |
2017 } | 2014 } |
2018 | 2015 |
2019 void | 2016 void |
2020 gen_gdecl(char *n, int gpc) | 2017 gen_gdecl(char *n, int gpc) |