From mboxrd@z Thu Jan  1 00:00:00 1970
From: Johan Rydberg <johan.rydberg@netinsight.se>
To: cgen@sources.redhat.com
Subject: enums
Date: Wed, 06 Dec 2000 00:30:00 -0000
Message-id: <3A2DF94D.908E4C45@netinsight.se>
X-SW-Source: 2000-q4/msg00234.html

Hi!

I define an enum like this:

 (define-enum
   (name e-exception)
   (comment "exception vectors")
   ()
   (prefix E_)
   (values ("RESET") ("BUSERR" -) ("DPF" -) ("IPF" -) 
           ("EXTINT" -) ("ALIGN" -) ("ILLEGAL" -) ("PEINT" -)
           ("DTLBMISS" -) ("ITLBMISS" -) ("RRANGE" -) 
           ("SYSCALL" -) ("BREAK" -) ("RESERVED" -))
 )

And the result in the "desc.h" file:

  /* Enum declaration for exception vectors.  */
  typedef enum e_exception {
    E_RESET
  } E_EXCEPTION;

As you can tell, all enums but the first one is left out.
And if I define the values like this,

  (values ("RESET" #x100) ("BUSERR" -) ("DPF" -) ("IPF" -) 
          ("EXTINT" -) ("ALIGN" -) ("ILLEGAL" -) ("PEINT" -)
          ("DTLBMISS" -) ("ITLBMISS" -) ("RRANGE" -) 
          ("SYSCALL" -) ("BREAK" -) ("RESERVED" -))

I get the following message for CGEN:

  ERROR: In procedure caar:
  ERROR: Wrong type argument in position 1: ()

Have I missed something as usual?

-- 
Johan Rydberg, Net Insight AB, Sweden, +46-8-685 04 00

$ ON F$ERROR("LANGUAGE","ENGLISH","IN_MESSAGE").GT.F$ERROR("NORMAL") -
             THEN EXCUSE/OBJECT=ME