From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <cgen-return-2250-listarch-cgen=sources.redhat.com@sourceware.org>
Received: (qmail 29311 invoked by alias); 20 Jun 2009 22:39:19 -0000
Received: (qmail 29289 invoked by uid 22791); 20 Jun 2009 22:39:18 -0000
X-SWARE-Spam-Status: No, hits=1.2 required=5.0 	tests=AWL,BAYES_50,DNS_FROM_RFC_BOGUSMX
X-Spam-Check-By: sourceware.org
Received: from sebabeach.org (HELO sebabeach.org) (64.165.110.50)     by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Sat, 20 Jun 2009 22:39:03 +0000
Received: from sspiff.sspiff.org (seba.sebabeach.org [10.8.159.10]) 	by sebabeach.org (Postfix) with ESMTP id 833FA6E3C4; 	Sat, 20 Jun 2009 15:39:01 -0700 (PDT)
Message-ID: <4A3D6504.5010203@sebabeach.org>
Date: Sat, 20 Jun 2009 22:39:00 -0000
From: Doug Evans <dje@sebabeach.org>
User-Agent: Thunderbird 2.0.0.21 (X11/20090320)
MIME-Version: 1.0
To: brolley@redhat.com, cgen@sourceware.org
Subject: CGEN_BITSET
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
X-IsSubscribed: yes
Mailing-List: contact cgen-help@sourceware.org; run by ezmlm
Precedence: bulk
List-Id: <cgen.sourceware.org>
List-Subscribe: <mailto:cgen-subscribe@sourceware.org>
List-Archive: <http://sourceware.org/ml/cgen/>
List-Post: <mailto:cgen@sourceware.org>
List-Help: <mailto:cgen-help@sourceware.org>, <http://sourceware.org/lists.html#faqs>
Sender: cgen-owner@sourceware.org
X-SW-Source: 2009-q2/txt/msg00052.txt.bz2

Treating "isa" specially is a bit of a hack.  What's the story behind 
CGEN_BITSET?

(define (gen-attr-type attr)
  (if (string=? (string-downcase (gen-sym attr)) "isa")
      "CGEN_BITSET"
      (case (attr-kind attr)
        ((boolean) "int")
        ((bitset)  "unsigned int")
        ((integer) "int")
        ((enum)    (string-append "enum " (string-downcase (gen-sym 
attr)) "_attr"))
        ))
)