Mercurial > hg > CbC > old > device

diff mc-codegen.c @ 256:d80e6387c539

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
powerpc function call complex arugment pre computation. (incomplete)
author kono
date Sat, 15 May 2004 12:04:56 +0900
parents 8cd8d72286ae
children 22949117768f
line wrap: on
line diff
--- a/mc-codegen.c	Fri May 14 20:57:52 2004 +0900
+++ b/mc-codegen.c	Sat May 15 12:04:56 2004 +0900
@@ -1636,6 +1636,7 @@
 {
     while(e) {
 	if (car(e)==type) return 1;
+	if (!car(e)) return 0;
 	if (LIST_ARGS(car(e))){
         /* list arguments */
 	    return contains_in_list(caddr(e),type);
@@ -1680,6 +1681,7 @@
 contains_p(int e,int (*p)(int))
 {
     while(e) {
+	if (!car(e)) return 0;
 	if (p(car(e))) return 1;
 	if (LIST_ARGS(car(e))){
         /* list arguments */