Mercurial > hg > CbC > old > device

comparison mc-codegen.c @ 109:e09f9de6f5d3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author kono
date Wed, 19 Mar 2003 02:22:33 +0900
parents 69e2e763cce5
children 7aa449aff3e6
comparison
equal deleted inserted replaced
108:69e2e763cce5 109:e09f9de6f5d3
120 return DOUBLE; 120 return DOUBLE;
121 case DRGVAR: 121 case DRGVAR:
122 code_drgvar(e1,1,freg); 122 code_drgvar(e1,1,freg);
123 return DOUBLE; 123 return DOUBLE;
124 case FNAME: 124 case FNAME:
125 code_fname(((NMTBL *)(e2))->nm,creg); 125 code_fname((NMTBL *)(e2),creg);
126 return ADDRESS; 126 return ADDRESS;
127 case CONST: /* 代入する値が0でも特別な処理はしない */ 127 case CONST: /* 代入する値が0でも特別な処理はしない */
128 code_const(e2,creg); 128 code_const(e2,creg);
129 return INT; 129 return INT;
130 case DCONST: 130 case DCONST:
484 cadddr(args)=size_of_double; /* why we need this? */ 484 cadddr(args)=size_of_double; /* why we need this? */
485 } 485 }
486 } 486 }
487 args = cadr(args); 487 args = cadr(args);
488 } 488 }
489 code_arg_register();
489 } 490 }
490 491
491 static int 492 static int
492 register_to_lvar(int e) 493 register_to_lvar(int e)
493 { 494 {