enums

[Johan Rydberg <johan dot rydberg at netinsight dot se>]

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