daily update
[binutils.git] / binutils / rcparse.y
blob8caa3ef94d8f17f7e32b829114604686b7dc5625
1 %{ /* rcparse.y -- parser for Windows rc files
2 Copyright 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2005, 2007, 2008
3 Free Software Foundation, Inc.
4 Written by Ian Lance Taylor, Cygnus Support.
5 Extended by Kai Tietz, Onevision.
7 This file is part of GNU Binutils.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
22 02110-1301, USA. */
25 /* This is a parser for Windows rc files. It is based on the parser
26 by Gunther Ebert <gunther.ebert@ixos-leipzig.de>. */
28 #include "sysdep.h"
29 #include "bfd.h"
30 #include "bucomm.h"
31 #include "libiberty.h"
32 #include "windres.h"
33 #include "safe-ctype.h"
35 /* The current language. */
37 static unsigned short language;
39 /* The resource information during a sub statement. */
41 static rc_res_res_info sub_res_info;
43 /* Dialog information. This is built by the nonterminals styles and
44 controls. */
46 static rc_dialog dialog;
48 /* This is used when building a style. It is modified by the
49 nonterminal styleexpr. */
51 static unsigned long style;
53 /* These are used when building a control. They are set before using
54 control_params. */
56 static rc_uint_type base_style;
57 static rc_uint_type default_style;
58 static rc_res_id class;
59 static rc_res_id res_text_field;
60 static unichar null_unichar;
62 /* This is used for COMBOBOX, LISTBOX and EDITTEXT which
63 do not allow resource 'text' field in control definition. */
64 static const rc_res_id res_null_text = { 1, {{0, &null_unichar}}};
68 %union
70 rc_accelerator acc;
71 rc_accelerator *pacc;
72 rc_dialog_control *dialog_control;
73 rc_menuitem *menuitem;
74 struct
76 rc_rcdata_item *first;
77 rc_rcdata_item *last;
78 } rcdata;
79 rc_rcdata_item *rcdata_item;
80 rc_fixed_versioninfo *fixver;
81 rc_ver_info *verinfo;
82 rc_ver_stringinfo *verstring;
83 rc_ver_varinfo *vervar;
84 rc_toolbar_item *toobar_item;
85 rc_res_id id;
86 rc_res_res_info res_info;
87 struct
89 rc_uint_type on;
90 rc_uint_type off;
91 } memflags;
92 struct
94 rc_uint_type val;
95 /* Nonzero if this number was explicitly specified as long. */
96 int dword;
97 } i;
98 rc_uint_type il;
99 rc_uint_type is;
100 const char *s;
101 struct
103 rc_uint_type length;
104 const char *s;
105 } ss;
106 unichar *uni;
107 struct
109 rc_uint_type length;
110 const unichar *s;
111 } suni;
114 %token BEG END
115 %token ACCELERATORS VIRTKEY ASCII NOINVERT SHIFT CONTROL ALT
116 %token BITMAP
117 %token CURSOR
118 %token DIALOG DIALOGEX EXSTYLE CAPTION CLASS STYLE
119 %token AUTO3STATE AUTOCHECKBOX AUTORADIOBUTTON CHECKBOX COMBOBOX CTEXT
120 %token DEFPUSHBUTTON EDITTEXT GROUPBOX LISTBOX LTEXT PUSHBOX PUSHBUTTON
121 %token RADIOBUTTON RTEXT SCROLLBAR STATE3 USERBUTTON
122 %token BEDIT HEDIT IEDIT
123 %token FONT
124 %token ICON
125 %token ANICURSOR ANIICON DLGINCLUDE DLGINIT FONTDIR HTML MANIFEST PLUGPLAY VXD TOOLBAR BUTTON
126 %token LANGUAGE CHARACTERISTICS VERSIONK
127 %token MENU MENUEX MENUITEM SEPARATOR POPUP CHECKED GRAYED HELP INACTIVE
128 %token MENUBARBREAK MENUBREAK
129 %token MESSAGETABLE
130 %token RCDATA
131 %token STRINGTABLE
132 %token VERSIONINFO FILEVERSION PRODUCTVERSION FILEFLAGSMASK FILEFLAGS
133 %token FILEOS FILETYPE FILESUBTYPE BLOCKSTRINGFILEINFO BLOCKVARFILEINFO
134 %token VALUE
135 %token <s> BLOCK
136 %token MOVEABLE FIXED PURE IMPURE PRELOAD LOADONCALL DISCARDABLE
137 %token NOT
138 %token <uni> QUOTEDUNISTRING
139 %token <s> QUOTEDSTRING STRING
140 %token <i> NUMBER
141 %token <suni> SIZEDUNISTRING
142 %token <ss> SIZEDSTRING
143 %token IGNORED_TOKEN
145 %type <pacc> acc_entries
146 %type <acc> acc_entry acc_event
147 %type <dialog_control> control control_params
148 %type <menuitem> menuitems menuitem menuexitems menuexitem
149 %type <rcdata> optrcdata_data optrcdata_data_int rcdata_data
150 %type <rcdata_item> opt_control_data
151 %type <fixver> fixedverinfo
152 %type <verinfo> verblocks
153 %type <verstring> vervals
154 %type <vervar> vertrans
155 %type <toobar_item> toolbar_data
156 %type <res_info> suboptions memflags_move_discard memflags_move
157 %type <memflags> memflag
158 %type <id> id rcdata_id optresidc resref resid cresid
159 %type <il> exstyle parennumber
160 %type <il> numexpr posnumexpr cnumexpr optcnumexpr cposnumexpr
161 %type <is> acc_options acc_option menuitem_flags menuitem_flag
162 %type <s> file_name
163 %type <uni> res_unicode_string resname res_unicode_string_concat
164 %type <ss> sizedstring
165 %type <suni> sizedunistring
166 %type <i> sizednumexpr sizedposnumexpr
168 %left '|'
169 %left '^'
170 %left '&'
171 %left '+' '-'
172 %left '*' '/' '%'
173 %right '~' NEG
177 input:
178 /* empty */
179 | input accelerator
180 | input bitmap
181 | input cursor
182 | input dialog
183 | input font
184 | input icon
185 | input language
186 | input menu
187 | input menuex
188 | input messagetable
189 | input stringtable
190 | input toolbar
191 | input user
192 | input versioninfo
193 | input IGNORED_TOKEN
196 /* Accelerator resources. */
198 accelerator:
199 id ACCELERATORS suboptions BEG acc_entries END
201 define_accelerator ($1, &$3, $5);
202 if (yychar != YYEMPTY)
203 YYERROR;
204 rcparse_discard_strings ();
208 acc_entries:
209 /* empty */
211 $$ = NULL;
213 | acc_entries acc_entry
215 rc_accelerator *a;
217 a = (rc_accelerator *) res_alloc (sizeof *a);
218 *a = $2;
219 if ($1 == NULL)
220 $$ = a;
221 else
223 rc_accelerator **pp;
225 for (pp = &$1->next; *pp != NULL; pp = &(*pp)->next)
227 *pp = a;
228 $$ = $1;
233 acc_entry:
234 acc_event cposnumexpr
236 $$ = $1;
237 $$.id = $2;
239 | acc_event cposnumexpr ',' acc_options
241 $$ = $1;
242 $$.id = $2;
243 $$.flags |= $4;
244 if (($$.flags & ACC_VIRTKEY) == 0
245 && ($$.flags & (ACC_SHIFT | ACC_CONTROL)) != 0)
246 rcparse_warning (_("inappropriate modifiers for non-VIRTKEY"));
250 acc_event:
251 QUOTEDSTRING
253 const char *s = $1;
254 char ch;
256 $$.next = NULL;
257 $$.id = 0;
258 ch = *s;
259 if (ch != '^')
260 $$.flags = 0;
261 else
263 $$.flags = ACC_CONTROL | ACC_VIRTKEY;
264 ++s;
265 ch = TOUPPER (s[0]);
267 $$.key = ch;
268 if (s[1] != '\0')
269 rcparse_warning (_("accelerator should only be one character"));
271 | posnumexpr
273 $$.next = NULL;
274 $$.flags = 0;
275 $$.id = 0;
276 $$.key = $1;
280 acc_options:
281 acc_option
283 $$ = $1;
285 | acc_options ',' acc_option
287 $$ = $1 | $3;
289 /* I've had one report that the comma is optional. */
290 | acc_options acc_option
292 $$ = $1 | $2;
296 acc_option:
297 VIRTKEY
299 $$ = ACC_VIRTKEY;
301 | ASCII
303 /* This is just the absence of VIRTKEY. */
304 $$ = 0;
306 | NOINVERT
308 $$ = ACC_NOINVERT;
310 | SHIFT
312 $$ = ACC_SHIFT;
314 | CONTROL
316 $$ = ACC_CONTROL;
318 | ALT
320 $$ = ACC_ALT;
324 /* Bitmap resources. */
326 bitmap:
327 id BITMAP memflags_move file_name
329 define_bitmap ($1, &$3, $4);
330 if (yychar != YYEMPTY)
331 YYERROR;
332 rcparse_discard_strings ();
336 /* Cursor resources. */
338 cursor:
339 id CURSOR memflags_move_discard file_name
341 define_cursor ($1, &$3, $4);
342 if (yychar != YYEMPTY)
343 YYERROR;
344 rcparse_discard_strings ();
348 /* Dialog resources. */
350 dialog:
351 id DIALOG memflags_move exstyle posnumexpr cnumexpr cnumexpr
352 cnumexpr
354 memset (&dialog, 0, sizeof dialog);
355 dialog.x = $5;
356 dialog.y = $6;
357 dialog.width = $7;
358 dialog.height = $8;
359 dialog.style = WS_POPUP | WS_BORDER | WS_SYSMENU;
360 dialog.exstyle = $4;
361 dialog.menu.named = 1;
362 dialog.class.named = 1;
363 dialog.font = NULL;
364 dialog.ex = NULL;
365 dialog.controls = NULL;
366 sub_res_info = $3;
367 style = 0;
369 styles BEG controls END
371 define_dialog ($1, &sub_res_info, &dialog);
372 if (yychar != YYEMPTY)
373 YYERROR;
374 rcparse_discard_strings ();
376 | id DIALOGEX memflags_move exstyle posnumexpr cnumexpr cnumexpr
377 cnumexpr
379 memset (&dialog, 0, sizeof dialog);
380 dialog.x = $5;
381 dialog.y = $6;
382 dialog.width = $7;
383 dialog.height = $8;
384 dialog.style = WS_POPUP | WS_BORDER | WS_SYSMENU;
385 dialog.exstyle = $4;
386 dialog.menu.named = 1;
387 dialog.class.named = 1;
388 dialog.font = NULL;
389 dialog.ex = ((rc_dialog_ex *)
390 res_alloc (sizeof (rc_dialog_ex)));
391 memset (dialog.ex, 0, sizeof (rc_dialog_ex));
392 dialog.controls = NULL;
393 sub_res_info = $3;
394 style = 0;
396 styles BEG controls END
398 define_dialog ($1, &sub_res_info, &dialog);
399 if (yychar != YYEMPTY)
400 YYERROR;
401 rcparse_discard_strings ();
403 | id DIALOGEX memflags_move exstyle posnumexpr cnumexpr cnumexpr
404 cnumexpr cnumexpr
406 memset (&dialog, 0, sizeof dialog);
407 dialog.x = $5;
408 dialog.y = $6;
409 dialog.width = $7;
410 dialog.height = $8;
411 dialog.style = WS_POPUP | WS_BORDER | WS_SYSMENU;
412 dialog.exstyle = $4;
413 dialog.menu.named = 1;
414 dialog.class.named = 1;
415 dialog.font = NULL;
416 dialog.ex = ((rc_dialog_ex *)
417 res_alloc (sizeof (rc_dialog_ex)));
418 memset (dialog.ex, 0, sizeof (rc_dialog_ex));
419 dialog.ex->help = $9;
420 dialog.controls = NULL;
421 sub_res_info = $3;
422 style = 0;
424 styles BEG controls END
426 define_dialog ($1, &sub_res_info, &dialog);
427 if (yychar != YYEMPTY)
428 YYERROR;
429 rcparse_discard_strings ();
433 exstyle:
434 /* empty */
436 $$ = 0;
438 | EXSTYLE '=' numexpr
440 $$ = $3;
444 styles:
445 /* empty */
446 | styles CAPTION res_unicode_string_concat
448 dialog.style |= WS_CAPTION;
449 style |= WS_CAPTION;
450 dialog.caption = $3;
452 | styles CLASS id
454 dialog.class = $3;
456 | styles STYLE
457 styleexpr
459 dialog.style = style;
461 | styles EXSTYLE numexpr
463 dialog.exstyle = $3;
465 | styles CLASS res_unicode_string_concat
467 res_unistring_to_id (& dialog.class, $3);
469 | styles FONT numexpr ',' res_unicode_string_concat
471 dialog.style |= DS_SETFONT;
472 style |= DS_SETFONT;
473 dialog.pointsize = $3;
474 dialog.font = $5;
475 if (dialog.ex != NULL)
477 dialog.ex->weight = 0;
478 dialog.ex->italic = 0;
479 dialog.ex->charset = 1;
482 | styles FONT numexpr ',' res_unicode_string_concat cnumexpr
484 dialog.style |= DS_SETFONT;
485 style |= DS_SETFONT;
486 dialog.pointsize = $3;
487 dialog.font = $5;
488 if (dialog.ex == NULL)
489 rcparse_warning (_("extended FONT requires DIALOGEX"));
490 else
492 dialog.ex->weight = $6;
493 dialog.ex->italic = 0;
494 dialog.ex->charset = 1;
497 | styles FONT numexpr ',' res_unicode_string_concat cnumexpr cnumexpr
499 dialog.style |= DS_SETFONT;
500 style |= DS_SETFONT;
501 dialog.pointsize = $3;
502 dialog.font = $5;
503 if (dialog.ex == NULL)
504 rcparse_warning (_("extended FONT requires DIALOGEX"));
505 else
507 dialog.ex->weight = $6;
508 dialog.ex->italic = $7;
509 dialog.ex->charset = 1;
512 | styles FONT numexpr ',' res_unicode_string_concat cnumexpr cnumexpr cnumexpr
514 dialog.style |= DS_SETFONT;
515 style |= DS_SETFONT;
516 dialog.pointsize = $3;
517 dialog.font = $5;
518 if (dialog.ex == NULL)
519 rcparse_warning (_("extended FONT requires DIALOGEX"));
520 else
522 dialog.ex->weight = $6;
523 dialog.ex->italic = $7;
524 dialog.ex->charset = $8;
527 | styles MENU id
529 dialog.menu = $3;
531 | styles CHARACTERISTICS numexpr
533 sub_res_info.characteristics = $3;
535 | styles LANGUAGE numexpr cnumexpr
537 sub_res_info.language = $3 | ($4 << SUBLANG_SHIFT);
539 | styles VERSIONK numexpr
541 sub_res_info.version = $3;
545 controls:
546 /* empty */
547 | controls control
549 rc_dialog_control **pp;
551 for (pp = &dialog.controls; *pp != NULL; pp = &(*pp)->next)
553 *pp = $2;
557 control:
558 AUTO3STATE optresidc
560 default_style = BS_AUTO3STATE | WS_TABSTOP;
561 base_style = BS_AUTO3STATE;
562 class.named = 0;
563 class.u.id = CTL_BUTTON;
564 res_text_field = $2;
566 control_params
568 $$ = $4;
570 | AUTOCHECKBOX optresidc
572 default_style = BS_AUTOCHECKBOX | WS_TABSTOP;
573 base_style = BS_AUTOCHECKBOX;
574 class.named = 0;
575 class.u.id = CTL_BUTTON;
576 res_text_field = $2;
578 control_params
580 $$ = $4;
582 | AUTORADIOBUTTON optresidc
584 default_style = BS_AUTORADIOBUTTON | WS_TABSTOP;
585 base_style = BS_AUTORADIOBUTTON;
586 class.named = 0;
587 class.u.id = CTL_BUTTON;
588 res_text_field = $2;
590 control_params
592 $$ = $4;
594 | BEDIT optresidc
596 default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
597 base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
598 class.named = 0;
599 class.u.id = CTL_EDIT;
600 res_text_field = $2;
602 control_params
604 $$ = $4;
605 if (dialog.ex == NULL)
606 rcparse_warning (_("BEDIT requires DIALOGEX"));
607 res_string_to_id (&$$->class, "BEDIT");
609 | CHECKBOX optresidc
611 default_style = BS_CHECKBOX | WS_TABSTOP;
612 base_style = BS_CHECKBOX | WS_TABSTOP;
613 class.named = 0;
614 class.u.id = CTL_BUTTON;
615 res_text_field = $2;
617 control_params
619 $$ = $4;
621 | COMBOBOX
623 /* This is as per MSDN documentation. With some (???)
624 versions of MS rc.exe their is no default style. */
625 default_style = CBS_SIMPLE | WS_TABSTOP;
626 base_style = 0;
627 class.named = 0;
628 class.u.id = CTL_COMBOBOX;
629 res_text_field = res_null_text;
631 control_params
633 $$ = $3;
635 | CONTROL optresidc numexpr cresid control_styleexpr cnumexpr
636 cnumexpr cnumexpr cnumexpr optcnumexpr opt_control_data
638 $$ = define_control ($2, $3, $6, $7, $8, $9, $4, style, $10);
639 if ($11 != NULL)
641 if (dialog.ex == NULL)
642 rcparse_warning (_("control data requires DIALOGEX"));
643 $$->data = $11;
646 | CONTROL optresidc numexpr cresid control_styleexpr cnumexpr
647 cnumexpr cnumexpr cnumexpr cnumexpr cnumexpr opt_control_data
649 $$ = define_control ($2, $3, $6, $7, $8, $9, $4, style, $10);
650 if (dialog.ex == NULL)
651 rcparse_warning (_("help ID requires DIALOGEX"));
652 $$->help = $11;
653 $$->data = $12;
655 | CTEXT optresidc
657 default_style = SS_CENTER | WS_GROUP;
658 base_style = SS_CENTER;
659 class.named = 0;
660 class.u.id = CTL_STATIC;
661 res_text_field = $2;
663 control_params
665 $$ = $4;
667 | DEFPUSHBUTTON optresidc
669 default_style = BS_DEFPUSHBUTTON | WS_TABSTOP;
670 base_style = BS_DEFPUSHBUTTON | WS_TABSTOP;
671 class.named = 0;
672 class.u.id = CTL_BUTTON;
673 res_text_field = $2;
675 control_params
677 $$ = $4;
679 | EDITTEXT
681 default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
682 base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
683 class.named = 0;
684 class.u.id = CTL_EDIT;
685 res_text_field = res_null_text;
687 control_params
689 $$ = $3;
691 | GROUPBOX optresidc
693 default_style = BS_GROUPBOX;
694 base_style = BS_GROUPBOX;
695 class.named = 0;
696 class.u.id = CTL_BUTTON;
697 res_text_field = $2;
699 control_params
701 $$ = $4;
703 | HEDIT optresidc
705 default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
706 base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
707 class.named = 0;
708 class.u.id = CTL_EDIT;
709 res_text_field = $2;
711 control_params
713 $$ = $4;
714 if (dialog.ex == NULL)
715 rcparse_warning (_("IEDIT requires DIALOGEX"));
716 res_string_to_id (&$$->class, "HEDIT");
718 | ICON resref numexpr cnumexpr cnumexpr opt_control_data
720 $$ = define_icon_control ($2, $3, $4, $5, 0, 0, 0, $6,
721 dialog.ex);
723 | ICON resref numexpr cnumexpr cnumexpr cnumexpr cnumexpr
724 opt_control_data
726 $$ = define_icon_control ($2, $3, $4, $5, 0, 0, 0, $8,
727 dialog.ex);
729 | ICON resref numexpr cnumexpr cnumexpr cnumexpr cnumexpr
730 icon_styleexpr optcnumexpr opt_control_data
732 $$ = define_icon_control ($2, $3, $4, $5, style, $9, 0, $10,
733 dialog.ex);
735 | ICON resref numexpr cnumexpr cnumexpr cnumexpr cnumexpr
736 icon_styleexpr cnumexpr cnumexpr opt_control_data
738 $$ = define_icon_control ($2, $3, $4, $5, style, $9, $10, $11,
739 dialog.ex);
741 | IEDIT optresidc
743 default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
744 base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
745 class.named = 0;
746 class.u.id = CTL_EDIT;
747 res_text_field = $2;
749 control_params
751 $$ = $4;
752 if (dialog.ex == NULL)
753 rcparse_warning (_("IEDIT requires DIALOGEX"));
754 res_string_to_id (&$$->class, "IEDIT");
756 | LISTBOX
758 default_style = LBS_NOTIFY | WS_BORDER;
759 base_style = LBS_NOTIFY | WS_BORDER;
760 class.named = 0;
761 class.u.id = CTL_LISTBOX;
762 res_text_field = res_null_text;
764 control_params
766 $$ = $3;
768 | LTEXT optresidc
770 default_style = SS_LEFT | WS_GROUP;
771 base_style = SS_LEFT;
772 class.named = 0;
773 class.u.id = CTL_STATIC;
774 res_text_field = $2;
776 control_params
778 $$ = $4;
780 | PUSHBOX optresidc
782 default_style = BS_PUSHBOX | WS_TABSTOP;
783 base_style = BS_PUSHBOX;
784 class.named = 0;
785 class.u.id = CTL_BUTTON;
787 control_params
789 $$ = $4;
791 | PUSHBUTTON optresidc
793 default_style = BS_PUSHBUTTON | WS_TABSTOP;
794 base_style = BS_PUSHBUTTON | WS_TABSTOP;
795 class.named = 0;
796 class.u.id = CTL_BUTTON;
797 res_text_field = $2;
799 control_params
801 $$ = $4;
803 | RADIOBUTTON optresidc
805 default_style = BS_RADIOBUTTON | WS_TABSTOP;
806 base_style = BS_RADIOBUTTON;
807 class.named = 0;
808 class.u.id = CTL_BUTTON;
809 res_text_field = $2;
811 control_params
813 $$ = $4;
815 | RTEXT optresidc
817 default_style = SS_RIGHT | WS_GROUP;
818 base_style = SS_RIGHT;
819 class.named = 0;
820 class.u.id = CTL_STATIC;
821 res_text_field = $2;
823 control_params
825 $$ = $4;
827 | SCROLLBAR
829 default_style = SBS_HORZ;
830 base_style = 0;
831 class.named = 0;
832 class.u.id = CTL_SCROLLBAR;
833 res_text_field = res_null_text;
835 control_params
837 $$ = $3;
839 | STATE3 optresidc
841 default_style = BS_3STATE | WS_TABSTOP;
842 base_style = BS_3STATE;
843 class.named = 0;
844 class.u.id = CTL_BUTTON;
845 res_text_field = $2;
847 control_params
849 $$ = $4;
851 | USERBUTTON resref numexpr ',' numexpr ',' numexpr ','
852 numexpr ',' numexpr ','
853 { style = WS_CHILD | WS_VISIBLE; }
854 styleexpr optcnumexpr
856 rc_res_id cid;
857 cid.named = 0;
858 cid.u.id = CTL_BUTTON;
859 $$ = define_control ($2, $3, $5, $7, $9, $11, cid,
860 style, $15);
864 /* Parameters for a control. The static variables DEFAULT_STYLE,
865 BASE_STYLE, and CLASS must be initialized before this nonterminal
866 is used. DEFAULT_STYLE is the style to use if no style expression
867 is specified. BASE_STYLE is the base style to use if a style
868 expression is specified; the style expression modifies the base
869 style. CLASS is the class of the control. */
871 control_params:
872 numexpr cnumexpr cnumexpr cnumexpr cnumexpr opt_control_data
874 $$ = define_control (res_text_field, $1, $2, $3, $4, $5, class,
875 default_style | WS_CHILD | WS_VISIBLE, 0);
876 if ($6 != NULL)
878 if (dialog.ex == NULL)
879 rcparse_warning (_("control data requires DIALOGEX"));
880 $$->data = $6;
883 | numexpr cnumexpr cnumexpr cnumexpr cnumexpr
884 control_params_styleexpr optcnumexpr opt_control_data
886 $$ = define_control (res_text_field, $1, $2, $3, $4, $5, class, style, $7);
887 if ($8 != NULL)
889 if (dialog.ex == NULL)
890 rcparse_warning (_("control data requires DIALOGEX"));
891 $$->data = $8;
894 | numexpr cnumexpr cnumexpr cnumexpr cnumexpr
895 control_params_styleexpr cnumexpr cnumexpr opt_control_data
897 $$ = define_control (res_text_field, $1, $2, $3, $4, $5, class, style, $7);
898 if (dialog.ex == NULL)
899 rcparse_warning (_("help ID requires DIALOGEX"));
900 $$->help = $8;
901 $$->data = $9;
905 cresid:
906 ',' resid
908 if ($2.named)
909 res_unistring_to_id (&$$, $2.u.n.name);
910 else
911 $$=$2;
915 optresidc:
916 /* empty */
918 res_string_to_id (&$$, "");
920 | resid ',' { $$=$1; }
923 resid:
924 posnumexpr
926 $$.named = 0;
927 $$.u.id = $1;
929 | res_unicode_string_concat
931 $$.named = 1;
932 $$.u.n.name = $1;
933 $$.u.n.length = unichar_len ($1);
937 opt_control_data:
938 /* empty */
940 $$ = NULL;
942 | BEG optrcdata_data END
944 $$ = $2.first;
948 /* These only exist to parse a reduction out of a common case. */
950 control_styleexpr:
952 { style = WS_CHILD | WS_VISIBLE; }
953 styleexpr
956 icon_styleexpr:
958 { style = SS_ICON | WS_CHILD | WS_VISIBLE; }
959 styleexpr
962 control_params_styleexpr:
964 { style = base_style | WS_CHILD | WS_VISIBLE; }
965 styleexpr
968 /* Font resources. */
970 font:
971 id FONT memflags_move_discard file_name
973 define_font ($1, &$3, $4);
974 if (yychar != YYEMPTY)
975 YYERROR;
976 rcparse_discard_strings ();
980 /* Icon resources. */
982 icon:
983 id ICON memflags_move_discard file_name
985 define_icon ($1, &$3, $4);
986 if (yychar != YYEMPTY)
987 YYERROR;
988 rcparse_discard_strings ();
992 /* Language command. This changes the static variable language, which
993 affects all subsequent resources. */
995 language:
996 LANGUAGE numexpr cnumexpr
998 language = $2 | ($3 << SUBLANG_SHIFT);
1002 /* Menu resources. */
1004 menu:
1005 id MENU suboptions BEG menuitems END
1007 define_menu ($1, &$3, $5);
1008 if (yychar != YYEMPTY)
1009 YYERROR;
1010 rcparse_discard_strings ();
1014 menuitems:
1015 /* empty */
1017 $$ = NULL;
1019 | menuitems menuitem
1021 if ($1 == NULL)
1022 $$ = $2;
1023 else
1025 rc_menuitem **pp;
1027 for (pp = &$1->next; *pp != NULL; pp = &(*pp)->next)
1029 *pp = $2;
1030 $$ = $1;
1035 menuitem:
1036 MENUITEM res_unicode_string_concat cnumexpr menuitem_flags
1038 $$ = define_menuitem ($2, $3, $4, 0, 0, NULL);
1040 | MENUITEM SEPARATOR
1042 $$ = define_menuitem (NULL, 0, 0, 0, 0, NULL);
1044 | POPUP res_unicode_string_concat menuitem_flags BEG menuitems END
1046 $$ = define_menuitem ($2, 0, $3, 0, 0, $5);
1050 menuitem_flags:
1051 /* empty */
1053 $$ = 0;
1055 | menuitem_flags ',' menuitem_flag
1057 $$ = $1 | $3;
1059 | menuitem_flags menuitem_flag
1061 $$ = $1 | $2;
1065 menuitem_flag:
1066 CHECKED
1068 $$ = MENUITEM_CHECKED;
1070 | GRAYED
1072 $$ = MENUITEM_GRAYED;
1074 | HELP
1076 $$ = MENUITEM_HELP;
1078 | INACTIVE
1080 $$ = MENUITEM_INACTIVE;
1082 | MENUBARBREAK
1084 $$ = MENUITEM_MENUBARBREAK;
1086 | MENUBREAK
1088 $$ = MENUITEM_MENUBREAK;
1092 /* Menuex resources. */
1094 menuex:
1095 id MENUEX suboptions BEG menuexitems END
1097 define_menu ($1, &$3, $5);
1098 if (yychar != YYEMPTY)
1099 YYERROR;
1100 rcparse_discard_strings ();
1104 menuexitems:
1105 /* empty */
1107 $$ = NULL;
1109 | menuexitems menuexitem
1111 if ($1 == NULL)
1112 $$ = $2;
1113 else
1115 rc_menuitem **pp;
1117 for (pp = &$1->next; *pp != NULL; pp = &(*pp)->next)
1119 *pp = $2;
1120 $$ = $1;
1125 menuexitem:
1126 MENUITEM res_unicode_string_concat
1128 $$ = define_menuitem ($2, 0, 0, 0, 0, NULL);
1130 | MENUITEM res_unicode_string_concat cnumexpr
1132 $$ = define_menuitem ($2, $3, 0, 0, 0, NULL);
1134 | MENUITEM res_unicode_string_concat cnumexpr cnumexpr optcnumexpr
1136 $$ = define_menuitem ($2, $3, $4, $5, 0, NULL);
1138 | MENUITEM SEPARATOR
1140 $$ = define_menuitem (NULL, 0, 0, 0, 0, NULL);
1142 | POPUP res_unicode_string_concat BEG menuexitems END
1144 $$ = define_menuitem ($2, 0, 0, 0, 0, $4);
1146 | POPUP res_unicode_string_concat cnumexpr BEG menuexitems END
1148 $$ = define_menuitem ($2, $3, 0, 0, 0, $5);
1150 | POPUP res_unicode_string_concat cnumexpr cnumexpr BEG menuexitems END
1152 $$ = define_menuitem ($2, $3, $4, 0, 0, $6);
1154 | POPUP res_unicode_string_concat cnumexpr cnumexpr cnumexpr optcnumexpr
1155 BEG menuexitems END
1157 $$ = define_menuitem ($2, $3, $4, $5, $6, $8);
1161 /* Messagetable resources. */
1163 messagetable:
1164 id MESSAGETABLE memflags_move file_name
1166 define_messagetable ($1, &$3, $4);
1167 if (yychar != YYEMPTY)
1168 YYERROR;
1169 rcparse_discard_strings ();
1173 /* We use a different lexing algorithm, because rcdata strings may
1174 contain embedded null bytes, and we need to know the length to use. */
1176 optrcdata_data:
1178 rcparse_rcdata ();
1180 optrcdata_data_int
1182 rcparse_normal ();
1183 $$ = $2;
1187 optrcdata_data_int:
1188 /* empty */
1190 $$.first = NULL;
1191 $$.last = NULL;
1193 | rcdata_data
1195 $$ = $1;
1199 rcdata_data:
1200 sizedstring
1202 rc_rcdata_item *ri;
1204 ri = define_rcdata_string ($1.s, $1.length);
1205 $$.first = ri;
1206 $$.last = ri;
1208 | sizedunistring
1210 rc_rcdata_item *ri;
1212 ri = define_rcdata_unistring ($1.s, $1.length);
1213 $$.first = ri;
1214 $$.last = ri;
1216 | sizednumexpr
1218 rc_rcdata_item *ri;
1220 ri = define_rcdata_number ($1.val, $1.dword);
1221 $$.first = ri;
1222 $$.last = ri;
1224 | rcdata_data ',' sizedstring
1226 rc_rcdata_item *ri;
1228 ri = define_rcdata_string ($3.s, $3.length);
1229 $$.first = $1.first;
1230 $1.last->next = ri;
1231 $$.last = ri;
1233 | rcdata_data ',' sizedunistring
1235 rc_rcdata_item *ri;
1237 ri = define_rcdata_unistring ($3.s, $3.length);
1238 $$.first = $1.first;
1239 $1.last->next = ri;
1240 $$.last = ri;
1242 | rcdata_data ',' sizednumexpr
1244 rc_rcdata_item *ri;
1246 ri = define_rcdata_number ($3.val, $3.dword);
1247 $$.first = $1.first;
1248 $1.last->next = ri;
1249 $$.last = ri;
1251 | rcdata_data ','
1253 $$=$1;
1257 /* Stringtable resources. */
1259 stringtable:
1260 STRINGTABLE suboptions BEG
1261 { sub_res_info = $2; }
1262 string_data END
1265 string_data:
1266 /* empty */
1267 | string_data numexpr res_unicode_string_concat
1269 define_stringtable (&sub_res_info, $2, $3);
1270 rcparse_discard_strings ();
1272 | string_data numexpr ',' res_unicode_string_concat
1274 define_stringtable (&sub_res_info, $2, $4);
1275 rcparse_discard_strings ();
1277 | string_data error
1279 rcparse_warning (_("invalid stringtable resource."));
1280 abort ();
1284 rcdata_id:
1287 $$=$1;
1289 | HTML
1291 $$.named = 0;
1292 $$.u.id = 23;
1294 | RCDATA
1296 $$.named = 0;
1297 $$.u.id = RT_RCDATA;
1299 | MANIFEST
1301 $$.named = 0;
1302 $$.u.id = RT_MANIFEST;
1304 | PLUGPLAY
1306 $$.named = 0;
1307 $$.u.id = RT_PLUGPLAY;
1309 | VXD
1311 $$.named = 0;
1312 $$.u.id = RT_VXD;
1314 | DLGINCLUDE
1316 $$.named = 0;
1317 $$.u.id = RT_DLGINCLUDE;
1319 | DLGINIT
1321 $$.named = 0;
1322 $$.u.id = RT_DLGINIT;
1324 | ANICURSOR
1326 $$.named = 0;
1327 $$.u.id = RT_ANICURSOR;
1329 | ANIICON
1331 $$.named = 0;
1332 $$.u.id = RT_ANIICON;
1336 /* User defined resources. We accept general suboptions in the
1337 file_name case to keep the parser happy. */
1339 user:
1340 id rcdata_id suboptions BEG optrcdata_data END
1342 define_user_data ($1, $2, &$3, $5.first);
1343 if (yychar != YYEMPTY)
1344 YYERROR;
1345 rcparse_discard_strings ();
1347 | id rcdata_id suboptions file_name
1349 define_user_file ($1, $2, &$3, $4);
1350 if (yychar != YYEMPTY)
1351 YYERROR;
1352 rcparse_discard_strings ();
1356 toolbar:
1357 id TOOLBAR suboptions numexpr cnumexpr BEG toolbar_data END
1359 define_toolbar ($1, &$3, $4, $5, $7);
1363 toolbar_data: /* empty */ { $$= NULL; }
1364 | toolbar_data BUTTON id
1366 rc_toolbar_item *c,*n;
1367 c = $1;
1368 n= (rc_toolbar_item *)
1369 res_alloc (sizeof (rc_toolbar_item));
1370 if (c != NULL)
1371 while (c->next != NULL)
1372 c = c->next;
1373 n->prev = c;
1374 n->next = NULL;
1375 if (c != NULL)
1376 c->next = n;
1377 n->id = $3;
1378 if ($1 == NULL)
1379 $$ = n;
1380 else
1381 $$ = $1;
1383 | toolbar_data SEPARATOR
1385 rc_toolbar_item *c,*n;
1386 c = $1;
1387 n= (rc_toolbar_item *)
1388 res_alloc (sizeof (rc_toolbar_item));
1389 if (c != NULL)
1390 while (c->next != NULL)
1391 c = c->next;
1392 n->prev = c;
1393 n->next = NULL;
1394 if (c != NULL)
1395 c->next = n;
1396 n->id.named = 0;
1397 n->id.u.id = 0;
1398 if ($1 == NULL)
1399 $$ = n;
1400 else
1401 $$ = $1;
1405 /* Versioninfo resources. */
1407 versioninfo:
1408 id VERSIONINFO fixedverinfo BEG verblocks END
1410 define_versioninfo ($1, language, $3, $5);
1411 if (yychar != YYEMPTY)
1412 YYERROR;
1413 rcparse_discard_strings ();
1417 fixedverinfo:
1418 /* empty */
1420 $$ = ((rc_fixed_versioninfo *)
1421 res_alloc (sizeof (rc_fixed_versioninfo)));
1422 memset ($$, 0, sizeof (rc_fixed_versioninfo));
1424 | fixedverinfo FILEVERSION numexpr cnumexpr cnumexpr cnumexpr
1426 $1->file_version_ms = ($3 << 16) | $4;
1427 $1->file_version_ls = ($5 << 16) | $6;
1428 $$ = $1;
1430 | fixedverinfo PRODUCTVERSION numexpr cnumexpr cnumexpr cnumexpr
1432 $1->product_version_ms = ($3 << 16) | $4;
1433 $1->product_version_ls = ($5 << 16) | $6;
1434 $$ = $1;
1436 | fixedverinfo FILEFLAGSMASK numexpr
1438 $1->file_flags_mask = $3;
1439 $$ = $1;
1441 | fixedverinfo FILEFLAGS numexpr
1443 $1->file_flags = $3;
1444 $$ = $1;
1446 | fixedverinfo FILEOS numexpr
1448 $1->file_os = $3;
1449 $$ = $1;
1451 | fixedverinfo FILETYPE numexpr
1453 $1->file_type = $3;
1454 $$ = $1;
1456 | fixedverinfo FILESUBTYPE numexpr
1458 $1->file_subtype = $3;
1459 $$ = $1;
1463 /* To handle verblocks successfully, the lexer handles BLOCK
1464 specially. A BLOCK "StringFileInfo" is returned as
1465 BLOCKSTRINGFILEINFO. A BLOCK "VarFileInfo" is returned as
1466 BLOCKVARFILEINFO. A BLOCK with some other string returns BLOCK
1467 with the string as the value. */
1469 verblocks:
1470 /* empty */
1472 $$ = NULL;
1474 | verblocks BLOCKSTRINGFILEINFO BEG BLOCK BEG vervals END END
1476 $$ = append_ver_stringfileinfo ($1, $4, $6);
1478 | verblocks BLOCKVARFILEINFO BEG VALUE res_unicode_string_concat vertrans END
1480 $$ = append_ver_varfileinfo ($1, $5, $6);
1484 vervals:
1485 /* empty */
1487 $$ = NULL;
1489 | vervals VALUE res_unicode_string_concat ',' res_unicode_string_concat
1491 $$ = append_verval ($1, $3, $5);
1495 vertrans:
1496 /* empty */
1498 $$ = NULL;
1500 | vertrans cnumexpr cnumexpr
1502 $$ = append_vertrans ($1, $2, $3);
1506 /* A resource ID. */
1509 posnumexpr
1511 $$.named = 0;
1512 $$.u.id = $1;
1514 | resname
1516 res_unistring_to_id (&$$, $1);
1520 /* A resource reference. */
1522 resname:
1523 res_unicode_string
1525 $$ = $1;
1527 | STRING
1529 unichar *h = NULL;
1530 unicode_from_ascii ((rc_uint_type *) NULL, &h, $1);
1531 $$ = h;
1536 resref:
1537 posnumexpr ','
1539 $$.named = 0;
1540 $$.u.id = $1;
1542 | resname
1544 res_unistring_to_id (&$$, $1);
1546 | resname ','
1548 res_unistring_to_id (&$$, $1);
1552 /* Generic suboptions. These may appear before the BEGIN in any
1553 multiline statement. */
1555 suboptions:
1556 /* empty */
1558 memset (&$$, 0, sizeof (rc_res_res_info));
1559 $$.language = language;
1560 /* FIXME: Is this the right default? */
1561 $$.memflags = MEMFLAG_MOVEABLE | MEMFLAG_PURE | MEMFLAG_DISCARDABLE;
1563 | suboptions memflag
1565 $$ = $1;
1566 $$.memflags |= $2.on;
1567 $$.memflags &=~ $2.off;
1569 | suboptions CHARACTERISTICS numexpr
1571 $$ = $1;
1572 $$.characteristics = $3;
1574 | suboptions LANGUAGE numexpr cnumexpr
1576 $$ = $1;
1577 $$.language = $3 | ($4 << SUBLANG_SHIFT);
1579 | suboptions VERSIONK numexpr
1581 $$ = $1;
1582 $$.version = $3;
1586 /* Memory flags which default to MOVEABLE and DISCARDABLE. */
1588 memflags_move_discard:
1589 /* empty */
1591 memset (&$$, 0, sizeof (rc_res_res_info));
1592 $$.language = language;
1593 $$.memflags = MEMFLAG_MOVEABLE | MEMFLAG_DISCARDABLE;
1595 | memflags_move_discard memflag
1597 $$ = $1;
1598 $$.memflags |= $2.on;
1599 $$.memflags &=~ $2.off;
1603 /* Memory flags which default to MOVEABLE. */
1605 memflags_move:
1606 /* empty */
1608 memset (&$$, 0, sizeof (rc_res_res_info));
1609 $$.language = language;
1610 $$.memflags = MEMFLAG_MOVEABLE | MEMFLAG_PURE | MEMFLAG_DISCARDABLE;
1612 | memflags_move memflag
1614 $$ = $1;
1615 $$.memflags |= $2.on;
1616 $$.memflags &=~ $2.off;
1620 /* Memory flags. This returns a struct with two integers, because we
1621 sometimes want to set bits and we sometimes want to clear them. */
1623 memflag:
1624 MOVEABLE
1626 $$.on = MEMFLAG_MOVEABLE;
1627 $$.off = 0;
1629 | FIXED
1631 $$.on = 0;
1632 $$.off = MEMFLAG_MOVEABLE;
1634 | PURE
1636 $$.on = MEMFLAG_PURE;
1637 $$.off = 0;
1639 | IMPURE
1641 $$.on = 0;
1642 $$.off = MEMFLAG_PURE;
1644 | PRELOAD
1646 $$.on = MEMFLAG_PRELOAD;
1647 $$.off = 0;
1649 | LOADONCALL
1651 $$.on = 0;
1652 $$.off = MEMFLAG_PRELOAD;
1654 | DISCARDABLE
1656 $$.on = MEMFLAG_DISCARDABLE;
1657 $$.off = 0;
1661 /* A file name. */
1663 file_name:
1664 QUOTEDSTRING
1666 $$ = $1;
1668 | STRING
1670 $$ = $1;
1674 /* Concat string */
1675 res_unicode_string_concat:
1676 res_unicode_string
1678 $$ = $1;
1681 res_unicode_string_concat res_unicode_string
1683 rc_uint_type l1 = unichar_len ($1);
1684 rc_uint_type l2 = unichar_len ($2);
1685 unichar *h = (unichar *) res_alloc ((l1 + l2 + 1) * sizeof (unichar));
1686 if (l1 != 0)
1687 memcpy (h, $1, l1 * sizeof (unichar));
1688 if (l2 != 0)
1689 memcpy (h + l1, $2, l2 * sizeof (unichar));
1690 h[l1 + l2] = 0;
1691 $$ = h;
1695 res_unicode_string:
1696 QUOTEDUNISTRING
1698 $$ = unichar_dup ($1);
1700 | QUOTEDSTRING
1702 unichar *h = NULL;
1703 unicode_from_ascii ((rc_uint_type *) NULL, &h, $1);
1704 $$ = h;
1708 sizedstring:
1709 SIZEDSTRING
1711 $$ = $1;
1713 | sizedstring SIZEDSTRING
1715 rc_uint_type l = $1.length + $2.length;
1716 char *h = (char *) res_alloc (l);
1717 memcpy (h, $1.s, $1.length);
1718 memcpy (h + $1.length, $2.s, $2.length);
1719 $$.s = h;
1720 $$.length = l;
1724 sizedunistring:
1725 SIZEDUNISTRING
1727 $$ = $1;
1729 | sizedunistring SIZEDUNISTRING
1731 rc_uint_type l = $1.length + $2.length;
1732 unichar *h = (unichar *) res_alloc (l * sizeof (unichar));
1733 memcpy (h, $1.s, $1.length * sizeof (unichar));
1734 memcpy (h + $1.length, $2.s, $2.length * sizeof (unichar));
1735 $$.s = h;
1736 $$.length = l;
1740 /* A style expression. This changes the static variable STYLE. We do
1741 it this way because rc appears to permit a style to be set to
1742 something like
1743 WS_GROUP | NOT WS_TABSTOP
1744 to mean that a default of WS_TABSTOP should be removed. Anything
1745 which wants to accept a style must first set STYLE to the default
1746 value. The styleexpr nonterminal will change STYLE as specified by
1747 the user. Note that we do not accept arbitrary expressions here,
1748 just numbers separated by '|'. */
1750 styleexpr:
1751 parennumber
1753 style |= $1;
1755 | NOT parennumber
1757 style &=~ $2;
1759 | styleexpr '|' parennumber
1761 style |= $3;
1763 | styleexpr '|' NOT parennumber
1765 style &=~ $4;
1769 parennumber:
1770 NUMBER
1772 $$ = $1.val;
1774 | '(' numexpr ')'
1776 $$ = $2;
1780 /* An optional expression with a leading comma. */
1782 optcnumexpr:
1783 /* empty */
1785 $$ = 0;
1787 | cnumexpr
1789 $$ = $1;
1793 /* An expression with a leading comma. */
1795 cnumexpr:
1796 ',' numexpr
1798 $$ = $2;
1802 /* A possibly negated numeric expression. */
1804 numexpr:
1805 sizednumexpr
1807 $$ = $1.val;
1811 /* A possibly negated expression with a size. */
1813 sizednumexpr:
1814 NUMBER
1816 $$ = $1;
1818 | '(' sizednumexpr ')'
1820 $$ = $2;
1822 | '~' sizednumexpr %prec '~'
1824 $$.val = ~ $2.val;
1825 $$.dword = $2.dword;
1827 | '-' sizednumexpr %prec NEG
1829 $$.val = - $2.val;
1830 $$.dword = $2.dword;
1832 | sizednumexpr '*' sizednumexpr
1834 $$.val = $1.val * $3.val;
1835 $$.dword = $1.dword || $3.dword;
1837 | sizednumexpr '/' sizednumexpr
1839 $$.val = $1.val / $3.val;
1840 $$.dword = $1.dword || $3.dword;
1842 | sizednumexpr '%' sizednumexpr
1844 $$.val = $1.val % $3.val;
1845 $$.dword = $1.dword || $3.dword;
1847 | sizednumexpr '+' sizednumexpr
1849 $$.val = $1.val + $3.val;
1850 $$.dword = $1.dword || $3.dword;
1852 | sizednumexpr '-' sizednumexpr
1854 $$.val = $1.val - $3.val;
1855 $$.dword = $1.dword || $3.dword;
1857 | sizednumexpr '&' sizednumexpr
1859 $$.val = $1.val & $3.val;
1860 $$.dword = $1.dword || $3.dword;
1862 | sizednumexpr '^' sizednumexpr
1864 $$.val = $1.val ^ $3.val;
1865 $$.dword = $1.dword || $3.dword;
1867 | sizednumexpr '|' sizednumexpr
1869 $$.val = $1.val | $3.val;
1870 $$.dword = $1.dword || $3.dword;
1874 /* An expression with a leading comma which does not use unary
1875 negation. */
1877 cposnumexpr:
1878 ',' posnumexpr
1880 $$ = $2;
1884 /* An expression which does not use unary negation. */
1886 posnumexpr:
1887 sizedposnumexpr
1889 $$ = $1.val;
1893 /* An expression which does not use unary negation. We separate unary
1894 negation to avoid parsing conflicts when two numeric expressions
1895 appear consecutively. */
1897 sizedposnumexpr:
1898 NUMBER
1900 $$ = $1;
1902 | '(' sizednumexpr ')'
1904 $$ = $2;
1906 | '~' sizednumexpr %prec '~'
1908 $$.val = ~ $2.val;
1909 $$.dword = $2.dword;
1911 | sizedposnumexpr '*' sizednumexpr
1913 $$.val = $1.val * $3.val;
1914 $$.dword = $1.dword || $3.dword;
1916 | sizedposnumexpr '/' sizednumexpr
1918 $$.val = $1.val / $3.val;
1919 $$.dword = $1.dword || $3.dword;
1921 | sizedposnumexpr '%' sizednumexpr
1923 $$.val = $1.val % $3.val;
1924 $$.dword = $1.dword || $3.dword;
1926 | sizedposnumexpr '+' sizednumexpr
1928 $$.val = $1.val + $3.val;
1929 $$.dword = $1.dword || $3.dword;
1931 | sizedposnumexpr '-' sizednumexpr
1933 $$.val = $1.val - $3.val;
1934 $$.dword = $1.dword || $3.dword;
1936 | sizedposnumexpr '&' sizednumexpr
1938 $$.val = $1.val & $3.val;
1939 $$.dword = $1.dword || $3.dword;
1941 | sizedposnumexpr '^' sizednumexpr
1943 $$.val = $1.val ^ $3.val;
1944 $$.dword = $1.dword || $3.dword;
1946 | sizedposnumexpr '|' sizednumexpr
1948 $$.val = $1.val | $3.val;
1949 $$.dword = $1.dword || $3.dword;
1955 /* Set the language from the command line. */
1957 void
1958 rcparse_set_language (int lang)
1960 language = lang;