diff options
| -rw-r--r-- | gcc/ChangeLog.MELT | 5 | ||||
| -rw-r--r-- | gcc/melt/warmelt-first.melt | 8 |
2 files changed, 12 insertions, 1 deletions
diff --git a/gcc/ChangeLog.MELT b/gcc/ChangeLog.MELT index ddc8624bac4..ee774cc8fcc 100644 --- a/gcc/ChangeLog.MELT +++ b/gcc/ChangeLog.MELT @@ -1,6 +1,11 @@ 2012-11-30 Basile Starynkevitch <basile@starynkevitch.net> + * melt/warmelt-first.melt (class_ctype): Add ctype_autoboxdiscr & + ctype_autoconstboxdiscr fields. + +2012-11-30 Basile Starynkevitch <basile@starynkevitch.net> + * melt/warmelt-macro.melt (mexpand_let): Default ctype is :auto... 2012-11-29 Basile Starynkevitch <basile@starynkevitch.net> diff --git a/gcc/melt/warmelt-first.melt b/gcc/melt/warmelt-first.melt index ecb74c11e7b..b615ef0c31a 100644 --- a/gcc/melt/warmelt-first.melt +++ b/gcc/melt/warmelt-first.melt @@ -319,6 +319,9 @@ $INITIAL_SYSTEM_DATA.}# ctype_resfield ;the name of the melt result union field (eg meltbp_longptr) ctype_marker ;the name of the marker routine ctype_altkeyword ;the alternate keyword associated to the ctype (e.g. :longinteger) + ctype_autoboxdiscr ;discriminant for auto-boxing or nil + ctype_autoconstboxdiscr ;discriminant for const + ;auto-boxing or nil ) :doc #{The $CLASS_CTYPE is for predefined descriptors of C types (like long or tree). $CTYPE_KEYWORD gives the associated @@ -329,7 +332,10 @@ corresponding C string). Argument member in union is given by $CTYPE_ARGFIELD, and by $CTYPE_RESFIELD for results. The marking routine is $CTYPE_MARKER and $CTYPE_DESCR is some descriptive string or data. A possible alternate keyword is given by $CTYPE_ALTKEYWORD. - Adding new c-types requires an update of MELT runtime!}# ) +The $CTYPE_AUTOBOXDISCR gives the discriminant for autoboxing or nil, +and the $CTYPE_AUTOCONSTBOXDISCR gives the discriminant for const +autoboxinf oe nil. Adding new c-types requires an update of MELT +runtime!}# ) ;;; the class describing plain ctypes, i.e. not GTY-ed, like :cstring or :long (defclass class_ctype_plain |