diff --git a/src/gracket/wxs/list.xci b/src/gracket/wxs/list.xci index 8dd747f5a0..5a032f6f05 100644 --- a/src/gracket/wxs/list.xci +++ b/src/gracket/wxs/list.xci @@ -44,7 +44,7 @@ @MACRO bReturnList[type.cnt] = WITH_VAR_STACK(__MakeList({x}, *x)); -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -60,7 +60,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; diff --git a/src/gracket/wxs/prefix.xci b/src/gracket/wxs/prefix.xci index b94a5f36cb..6e2a7e7ac6 100644 --- a/src/gracket/wxs/prefix.xci +++ b/src/gracket/wxs/prefix.xci @@ -1,3 +1,9 @@ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif diff --git a/src/gracket/wxs/wxs_bmap.cxx b/src/gracket/wxs/wxs_bmap.cxx index ec4b17e2bf..b903c12fa3 100644 --- a/src/gracket/wxs/wxs_bmap.cxx +++ b/src/gracket/wxs/wxs_bmap.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_bmap.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -82,7 +88,7 @@ static void init_symset_bitmapType(void) { bitmapType_wxBITMAP_TYPE_MASK_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("unknown/mask")); } -static int unbundle_symset_bitmapType(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_bitmapType(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!bitmapType_wxBITMAP_TYPE_MASK_sym) WITH_VAR_STACK(init_symset_bitmapType()); @@ -103,7 +109,7 @@ static int unbundle_symset_bitmapType(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_bitmapType(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_bitmapType(int v) { if (!bitmapType_wxBITMAP_TYPE_MASK_sym) init_symset_bitmapType(); switch (v) { case wxBITMAP_TYPE_BMP: return bitmapType_wxBITMAP_TYPE_BMP_sym; @@ -143,7 +149,7 @@ static void init_symset_saveBitmapType(void) { saveBitmapType_wxBITMAP_TYPE_PNG_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("png")); } -static int unbundle_symset_saveBitmapType(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_saveBitmapType(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!saveBitmapType_wxBITMAP_TYPE_PNG_sym) WITH_VAR_STACK(init_symset_saveBitmapType()); diff --git a/src/gracket/wxs/wxs_butn.cxx b/src/gracket/wxs/wxs_butn.cxx index c712537869..2828dca57f 100644 --- a/src/gracket/wxs/wxs_butn.cxx +++ b/src/gracket/wxs/wxs_butn.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_butn.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -46,7 +52,7 @@ static void init_symset_buttonStyle(void) { buttonStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_buttonStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_buttonStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!buttonStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_buttonStyle()); diff --git a/src/gracket/wxs/wxs_chce.cxx b/src/gracket/wxs/wxs_chce.cxx index c8676800d5..af7cbc97f0 100644 --- a/src/gracket/wxs/wxs_chce.cxx +++ b/src/gracket/wxs/wxs_chce.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_chce.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -55,7 +61,7 @@ static void init_symset_choiceStyle(void) { choiceStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_choiceStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_choiceStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!choiceStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_choiceStyle()); @@ -76,7 +82,7 @@ static int unbundle_symset_choiceStyle(Scheme_Object *v, const char *where) { return 0; } -static int istype_symset_choiceStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int istype_symset_choiceStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!choiceStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_choiceStyle()); @@ -169,7 +175,7 @@ static void CB_TOSCHEME(CB_REALCLASS *obj, wxCommandEvent *event); -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -185,7 +191,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; diff --git a/src/gracket/wxs/wxs_ckbx.cxx b/src/gracket/wxs/wxs_ckbx.cxx index 55ced7750a..21ce301725 100644 --- a/src/gracket/wxs/wxs_ckbx.cxx +++ b/src/gracket/wxs/wxs_ckbx.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_ckbx.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -43,7 +49,7 @@ static void init_symset_checkboxStyle(void) { checkboxStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_checkboxStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_checkboxStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!checkboxStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_checkboxStyle()); @@ -62,7 +68,7 @@ static int unbundle_symset_checkboxStyle(Scheme_Object *v, const char *where) { return 0; } -static int istype_symset_checkboxStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int istype_symset_checkboxStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!checkboxStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_checkboxStyle()); diff --git a/src/gracket/wxs/wxs_cnvs.cxx b/src/gracket/wxs/wxs_cnvs.cxx index d1971b9d24..2f93ba4af0 100644 --- a/src/gracket/wxs/wxs_cnvs.cxx +++ b/src/gracket/wxs/wxs_cnvs.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_cnvs.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -115,7 +121,7 @@ static void init_symset_canvasStyle(void) { canvasStyle_wxNEVER_FOCUS_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("no-focus")); } -static int unbundle_symset_canvasStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_canvasStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!canvasStyle_wxNEVER_FOCUS_sym) WITH_VAR_STACK(init_symset_canvasStyle()); @@ -157,7 +163,7 @@ static void init_symset_orientation(void) { orientation_wxHORIZONTAL_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("horizontal")); } -static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!orientation_wxHORIZONTAL_sym) WITH_VAR_STACK(init_symset_orientation()); @@ -169,7 +175,7 @@ static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_orientation(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_orientation(int v) { if (!orientation_wxHORIZONTAL_sym) init_symset_orientation(); switch (v) { case wxVERTICAL: return orientation_wxVERTICAL_sym; diff --git a/src/gracket/wxs/wxs_dc.cxx b/src/gracket/wxs/wxs_dc.cxx index 08398c45ce..5756e4dd50 100644 --- a/src/gracket/wxs/wxs_dc.cxx +++ b/src/gracket/wxs/wxs_dc.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_dc.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -87,7 +93,7 @@ static void init_symset_textMode(void) { textMode_wxSOLID_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("solid")); } -static int unbundle_symset_textMode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_textMode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!textMode_wxSOLID_sym) WITH_VAR_STACK(init_symset_textMode()); @@ -99,7 +105,7 @@ static int unbundle_symset_textMode(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_textMode(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_textMode(int v) { if (!textMode_wxSOLID_sym) init_symset_textMode(); switch (v) { case wxTRANSPARENT: return textMode_wxTRANSPARENT_sym; @@ -123,7 +129,7 @@ static void init_symset_bitmapDrawStyle(void) { bitmapDrawStyle_wxXOR_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("xor")); } -static int unbundle_symset_bitmapDrawStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_bitmapDrawStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!bitmapDrawStyle_wxXOR_sym) WITH_VAR_STACK(init_symset_bitmapDrawStyle()); @@ -149,7 +155,7 @@ static void init_symset_fillKind(void) { fillKind_wxWINDING_RULE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("winding")); } -static int unbundle_symset_fillKind(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_fillKind(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!fillKind_wxWINDING_RULE_sym) WITH_VAR_STACK(init_symset_fillKind()); @@ -176,7 +182,7 @@ static void init_symset_smoothingMode(void) { smoothingMode_2_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("aligned")); } -static int unbundle_symset_smoothingMode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_smoothingMode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!smoothingMode_2_sym) WITH_VAR_STACK(init_symset_smoothingMode()); @@ -189,7 +195,7 @@ static int unbundle_symset_smoothingMode(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_smoothingMode(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_smoothingMode(int v) { if (!smoothingMode_2_sym) init_symset_smoothingMode(); switch (v) { case 0: return smoothingMode_0_sym; @@ -837,7 +843,7 @@ static void init_symset_brushStyle(void) { brushStyle_wxPANEL_PATTERN_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("panel")); } -static int unbundle_symset_brushStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_brushStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!brushStyle_wxPANEL_PATTERN_sym) WITH_VAR_STACK(init_symset_brushStyle()); @@ -859,7 +865,7 @@ static int unbundle_symset_brushStyle(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_brushStyle(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_brushStyle(int v) { if (!brushStyle_wxPANEL_PATTERN_sym) init_symset_brushStyle(); switch (v) { case wxTRANSPARENT: return brushStyle_wxTRANSPARENT_sym; @@ -920,7 +926,7 @@ static void init_symset_penStyle(void) { penStyle_wxXOR_DOT_DASH_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("xor-dot-dash")); } -static int unbundle_symset_penStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_penStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!penStyle_wxXOR_DOT_DASH_sym) WITH_VAR_STACK(init_symset_penStyle()); @@ -942,7 +948,7 @@ static int unbundle_symset_penStyle(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_penStyle(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_penStyle(int v) { if (!penStyle_wxXOR_DOT_DASH_sym) init_symset_penStyle(); switch (v) { case wxTRANSPARENT: return penStyle_wxTRANSPARENT_sym; @@ -1012,7 +1018,7 @@ extern wxPoint *objscheme_unbundle_wxPoint(Scheme_Object *, const char *, int); -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -1028,7 +1034,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; diff --git a/src/gracket/wxs/wxs_evnt.cxx b/src/gracket/wxs/wxs_evnt.cxx index 12df009e46..c62773b6ab 100644 --- a/src/gracket/wxs/wxs_evnt.cxx +++ b/src/gracket/wxs/wxs_evnt.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_evnt.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -331,7 +337,7 @@ static void init_symset_actionType(void) { actionType_wxEVENT_TYPE_MENU_POPDOWN_NONE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("menu-popdown-none")); } -static int unbundle_symset_actionType(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_actionType(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!actionType_wxEVENT_TYPE_MENU_POPDOWN_NONE_sym) WITH_VAR_STACK(init_symset_actionType()); @@ -354,7 +360,7 @@ static int unbundle_symset_actionType(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_actionType(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_actionType(int v) { if (!actionType_wxEVENT_TYPE_MENU_POPDOWN_NONE_sym) init_symset_actionType(); switch (v) { case wxEVENT_TYPE_BUTTON_COMMAND: return actionType_wxEVENT_TYPE_BUTTON_COMMAND_sym; @@ -765,7 +771,7 @@ static void init_symset_scrollMoveType(void) { scrollMoveType_wxEVENT_TYPE_SCROLL_THUMBTRACK_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("thumb")); } -static int unbundle_symset_scrollMoveType(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_scrollMoveType(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!scrollMoveType_wxEVENT_TYPE_SCROLL_THUMBTRACK_sym) WITH_VAR_STACK(init_symset_scrollMoveType()); @@ -782,7 +788,7 @@ static int unbundle_symset_scrollMoveType(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_scrollMoveType(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_scrollMoveType(int v) { if (!scrollMoveType_wxEVENT_TYPE_SCROLL_THUMBTRACK_sym) init_symset_scrollMoveType(); switch (v) { case wxEVENT_TYPE_SCROLL_TOP: return scrollMoveType_wxEVENT_TYPE_SCROLL_TOP_sym; @@ -809,7 +815,7 @@ static void init_symset_orientation(void) { orientation_wxHORIZONTAL_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("horizontal")); } -static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!orientation_wxHORIZONTAL_sym) WITH_VAR_STACK(init_symset_orientation()); @@ -821,7 +827,7 @@ static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_orientation(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_orientation(int v) { if (!orientation_wxHORIZONTAL_sym) init_symset_orientation(); switch (v) { case wxVERTICAL: return orientation_wxVERTICAL_sym; @@ -1317,7 +1323,7 @@ static void init_symset_keyCode(void) { keyCode_WXK_RELEASE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("release")); } -static int unbundle_symset_keyCode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_keyCode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!keyCode_WXK_RELEASE_sym) WITH_VAR_STACK(init_symset_keyCode()); @@ -1398,7 +1404,7 @@ static int unbundle_symset_keyCode(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_keyCode(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_keyCode(int v) { if (!keyCode_WXK_RELEASE_sym) init_symset_keyCode(); switch (v) { case WXK_ESCAPE: return keyCode_WXK_ESCAPE_sym; @@ -2265,7 +2271,7 @@ static void init_symset_mouseEventType(void) { mouseEventType_wxEVENT_TYPE_LEAVE_WINDOW_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("leave")); } -static int unbundle_symset_mouseEventType(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_mouseEventType(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!mouseEventType_wxEVENT_TYPE_LEAVE_WINDOW_sym) WITH_VAR_STACK(init_symset_mouseEventType()); @@ -2284,7 +2290,7 @@ static int unbundle_symset_mouseEventType(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_mouseEventType(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_mouseEventType(int v) { if (!mouseEventType_wxEVENT_TYPE_LEAVE_WINDOW_sym) init_symset_mouseEventType(); switch (v) { case wxEVENT_TYPE_LEFT_DOWN: return mouseEventType_wxEVENT_TYPE_LEFT_DOWN_sym; @@ -2319,7 +2325,7 @@ static void init_symset_buttonId(void) { buttonId_3_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("right")); } -static int unbundle_symset_buttonId(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_buttonId(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!buttonId_3_sym) WITH_VAR_STACK(init_symset_buttonId()); diff --git a/src/gracket/wxs/wxs_fram.cxx b/src/gracket/wxs/wxs_fram.cxx index 16e1e93ab7..fa297973f7 100644 --- a/src/gracket/wxs/wxs_fram.cxx +++ b/src/gracket/wxs/wxs_fram.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_fram.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -99,7 +105,7 @@ static void init_symset_frameStyle(void) { frameStyle_wxFLOAT_FRAME_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("float")); } -static int unbundle_symset_frameStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_frameStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!frameStyle_wxFLOAT_FRAME_sym) WITH_VAR_STACK(init_symset_frameStyle()); @@ -141,7 +147,7 @@ static void init_symset_iconKind(void) { iconKind_2_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("large")); } -static int unbundle_symset_iconKind(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_iconKind(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!iconKind_2_sym) WITH_VAR_STACK(init_symset_iconKind()); diff --git a/src/gracket/wxs/wxs_gage.cxx b/src/gracket/wxs/wxs_gage.cxx index 6c50886946..02bc398355 100644 --- a/src/gracket/wxs/wxs_gage.cxx +++ b/src/gracket/wxs/wxs_gage.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_gage.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -108,7 +114,7 @@ static void init_symset_gaugeStyle(void) { gaugeStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_gaugeStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_gaugeStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!gaugeStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_gaugeStyle()); diff --git a/src/gracket/wxs/wxs_gdi.cxx b/src/gracket/wxs/wxs_gdi.cxx index 3d9d6205de..e54ecc81fa 100644 --- a/src/gracket/wxs/wxs_gdi.cxx +++ b/src/gracket/wxs/wxs_gdi.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_gdi.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -70,7 +76,7 @@ static void init_symset_family(void) { family_wxSYMBOL_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("symbol")); } -static int unbundle_symset_family(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_family(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!family_wxSYMBOL_sym) WITH_VAR_STACK(init_symset_family()); @@ -88,7 +94,7 @@ static int unbundle_symset_family(Scheme_Object *v, const char *where) { return 0; } -static int istype_symset_family(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int istype_symset_family(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!family_wxSYMBOL_sym) WITH_VAR_STACK(init_symset_family()); @@ -106,7 +112,7 @@ static int istype_symset_family(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_family(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_family(int v) { if (!family_wxSYMBOL_sym) init_symset_family(); switch (v) { case wxDEFAULT: return family_wxDEFAULT_sym; @@ -136,7 +142,7 @@ static void init_symset_weight(void) { weight_wxBOLD_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("bold")); } -static int unbundle_symset_weight(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_weight(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!weight_wxBOLD_sym) WITH_VAR_STACK(init_symset_weight()); @@ -149,7 +155,7 @@ static int unbundle_symset_weight(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_weight(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_weight(int v) { if (!weight_wxBOLD_sym) init_symset_weight(); switch (v) { case wxNORMAL: return weight_wxNORMAL_sym; @@ -174,7 +180,7 @@ static void init_symset_style(void) { style_wxSLANT_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("slant")); } -static int unbundle_symset_style(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_style(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!style_wxSLANT_sym) WITH_VAR_STACK(init_symset_style()); @@ -187,7 +193,7 @@ static int unbundle_symset_style(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_style(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_style(int v) { if (!style_wxSLANT_sym) init_symset_style(); switch (v) { case wxNORMAL: return style_wxNORMAL_sym; @@ -215,7 +221,7 @@ static void init_symset_smoothing(void) { smoothing_wxSMOOTHING_OFF_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("unsmoothed")); } -static int unbundle_symset_smoothing(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_smoothing(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!smoothing_wxSMOOTHING_OFF_sym) WITH_VAR_STACK(init_symset_smoothing()); @@ -229,7 +235,7 @@ static int unbundle_symset_smoothing(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_smoothing(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_smoothing(int v) { if (!smoothing_wxSMOOTHING_OFF_sym) init_symset_smoothing(); switch (v) { case wxSMOOTHING_DEFAULT: return smoothing_wxSMOOTHING_DEFAULT_sym; @@ -1826,7 +1832,7 @@ static void init_symset_brushStyle(void) { brushStyle_wxPANEL_PATTERN_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("panel")); } -static int unbundle_symset_brushStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_brushStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!brushStyle_wxPANEL_PATTERN_sym) WITH_VAR_STACK(init_symset_brushStyle()); @@ -1848,7 +1854,7 @@ static int unbundle_symset_brushStyle(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_brushStyle(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_brushStyle(int v) { if (!brushStyle_wxPANEL_PATTERN_sym) init_symset_brushStyle(); switch (v) { case wxTRANSPARENT: return brushStyle_wxTRANSPARENT_sym; @@ -1909,7 +1915,7 @@ static void init_symset_penStyle(void) { penStyle_wxXOR_DOT_DASH_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("xor-dot-dash")); } -static int unbundle_symset_penStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_penStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!penStyle_wxXOR_DOT_DASH_sym) WITH_VAR_STACK(init_symset_penStyle()); @@ -1931,7 +1937,7 @@ static int unbundle_symset_penStyle(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_penStyle(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_penStyle(int v) { if (!penStyle_wxXOR_DOT_DASH_sym) init_symset_penStyle(); switch (v) { case wxTRANSPARENT: return penStyle_wxTRANSPARENT_sym; @@ -2567,7 +2573,7 @@ static void init_symset_join(void) { join_wxJOIN_ROUND_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("round")); } -static int unbundle_symset_join(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_join(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!join_wxJOIN_ROUND_sym) WITH_VAR_STACK(init_symset_join()); @@ -2580,7 +2586,7 @@ static int unbundle_symset_join(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_join(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_join(int v) { if (!join_wxJOIN_ROUND_sym) init_symset_join(); switch (v) { case wxJOIN_BEVEL: return join_wxJOIN_BEVEL_sym; @@ -2605,7 +2611,7 @@ static void init_symset_cap(void) { cap_wxCAP_BUTT_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("butt")); } -static int unbundle_symset_cap(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_cap(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!cap_wxCAP_BUTT_sym) WITH_VAR_STACK(init_symset_cap()); @@ -2618,7 +2624,7 @@ static int unbundle_symset_cap(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_cap(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_cap(int v) { if (!cap_wxCAP_BUTT_sym) init_symset_cap(); switch (v) { case wxCAP_ROUND: return cap_wxCAP_ROUND_sym; @@ -3436,7 +3442,7 @@ static void init_symset_cursor(void) { cursor_wxCURSOR_BLANK_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("blank")); } -static int unbundle_symset_cursor(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_cursor(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!cursor_wxCURSOR_BLANK_sym) WITH_VAR_STACK(init_symset_cursor()); @@ -3458,7 +3464,7 @@ static int unbundle_symset_cursor(Scheme_Object *v, const char *where) { return 0; } -static int istype_symset_cursor(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int istype_symset_cursor(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!cursor_wxCURSOR_BLANK_sym) WITH_VAR_STACK(init_symset_cursor()); @@ -3754,7 +3760,7 @@ static void *RgnBoundingBox(wxRegion *r) -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -3770,7 +3776,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; @@ -3837,7 +3843,7 @@ static void init_symset_fillKind(void) { fillKind_wxWINDING_RULE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("winding")); } -static int unbundle_symset_fillKind(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_fillKind(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!fillKind_wxWINDING_RULE_sym) WITH_VAR_STACK(init_symset_fillKind()); @@ -3864,7 +3870,7 @@ static void init_symset_smoothingMode(void) { smoothingMode_2_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("aligned")); } -static int unbundle_symset_smoothingMode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_smoothingMode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!smoothingMode_2_sym) WITH_VAR_STACK(init_symset_smoothingMode()); @@ -3877,7 +3883,7 @@ static int unbundle_symset_smoothingMode(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_smoothingMode(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_smoothingMode(int v) { if (!smoothingMode_2_sym) init_symset_smoothingMode(); switch (v) { case 0: return smoothingMode_0_sym; diff --git a/src/gracket/wxs/wxs_glob.cxx b/src/gracket/wxs/wxs_glob.cxx index 59b34487db..74cb456b17 100644 --- a/src/gracket/wxs/wxs_glob.cxx +++ b/src/gracket/wxs/wxs_glob.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_glob.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -109,7 +115,7 @@ static void init_symset_fileSelMode(void) { fileSelMode_wxBUNDLES_ENTER_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("enter-packages")); } -static int unbundle_symset_fileSelMode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_fileSelMode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!fileSelMode_wxBUNDLES_ENTER_sym) WITH_VAR_STACK(init_symset_fileSelMode()); @@ -135,7 +141,7 @@ static int unbundle_symset_fileSelMode(Scheme_Object *v, const char *where) { return 0; } -static int istype_symset_fileSelMode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int istype_symset_fileSelMode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!fileSelMode_wxBUNDLES_ENTER_sym) WITH_VAR_STACK(init_symset_fileSelMode()); @@ -161,7 +167,7 @@ static int istype_symset_fileSelMode(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_fileSelMode(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_fileSelMode(int v) { REMEMBER_VAR_STACK(); if (!fileSelMode_wxBUNDLES_ENTER_sym) init_symset_fileSelMode(); Scheme_Object *l = scheme_null; diff --git a/src/gracket/wxs/wxs_item.cxx b/src/gracket/wxs/wxs_item.cxx index 0f814b725e..00fe2b1510 100644 --- a/src/gracket/wxs/wxs_item.cxx +++ b/src/gracket/wxs/wxs_item.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_item.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -230,7 +236,7 @@ static void init_symset_messageStyle(void) { messageStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_messageStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_messageStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!messageStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_messageStyle()); @@ -249,7 +255,7 @@ static int unbundle_symset_messageStyle(Scheme_Object *v, const char *where) { return 0; } -static int istype_symset_messageStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int istype_symset_messageStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!messageStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_messageStyle()); @@ -283,7 +289,7 @@ static void init_symset_iconID(void) { iconID_wxMSGICON_ERROR_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("stop")); } -static int unbundle_symset_iconID(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_iconID(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!iconID_wxMSGICON_ERROR_sym) WITH_VAR_STACK(init_symset_iconID()); @@ -296,7 +302,7 @@ static int unbundle_symset_iconID(Scheme_Object *v, const char *where) { return 0; } -static int istype_symset_iconID(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int istype_symset_iconID(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!iconID_wxMSGICON_ERROR_sym) WITH_VAR_STACK(init_symset_iconID()); diff --git a/src/gracket/wxs/wxs_lbox.cxx b/src/gracket/wxs/wxs_lbox.cxx index bde8042230..5d7196b619 100644 --- a/src/gracket/wxs/wxs_lbox.cxx +++ b/src/gracket/wxs/wxs_lbox.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_lbox.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -73,7 +79,7 @@ static void init_symset_kind(void) { kind_wxEXTENDED_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("extended")); } -static int unbundle_symset_kind(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_kind(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!kind_wxEXTENDED_sym) WITH_VAR_STACK(init_symset_kind()); @@ -107,7 +113,7 @@ static void init_symset_style(void) { style_wxHORIZONTAL_LABEL_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("horizontal-label")); } -static int unbundle_symset_style(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_style(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!style_wxHORIZONTAL_LABEL_sym) WITH_VAR_STACK(init_symset_style()); @@ -202,7 +208,7 @@ static void CB_TOSCHEME(CB_REALCLASS *obj, wxCommandEvent *event); -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -218,7 +224,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; diff --git a/src/gracket/wxs/wxs_menu.cxx b/src/gracket/wxs/wxs_menu.cxx index 1ffa0254b8..2bc9991b3b 100644 --- a/src/gracket/wxs/wxs_menu.cxx +++ b/src/gracket/wxs/wxs_menu.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_menu.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif diff --git a/src/gracket/wxs/wxs_misc.cxx b/src/gracket/wxs/wxs_misc.cxx index 20fc34343a..ccb9154d49 100644 --- a/src/gracket/wxs/wxs_misc.cxx +++ b/src/gracket/wxs/wxs_misc.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_misc.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -1108,7 +1114,7 @@ static void init_symset_psMode(void) { psMode_PS_PRINTER_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("printer")); } -static int unbundle_symset_psMode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_psMode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!psMode_PS_PRINTER_sym) WITH_VAR_STACK(init_symset_psMode()); @@ -1121,7 +1127,7 @@ static int unbundle_symset_psMode(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_psMode(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_psMode(int v) { if (!psMode_PS_PRINTER_sym) init_symset_psMode(); switch (v) { case PS_PREVIEW: return psMode_PS_PREVIEW_sym; @@ -1143,7 +1149,7 @@ static void init_symset_psOrientation(void) { psOrientation_PS_LANDSCAPE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("landscape")); } -static int unbundle_symset_psOrientation(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_psOrientation(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!psOrientation_PS_LANDSCAPE_sym) WITH_VAR_STACK(init_symset_psOrientation()); @@ -1155,7 +1161,7 @@ static int unbundle_symset_psOrientation(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_psOrientation(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_psOrientation(int v) { if (!psOrientation_PS_LANDSCAPE_sym) init_symset_psOrientation(); switch (v) { case PS_PORTRAIT: return psOrientation_PS_PORTRAIT_sym; diff --git a/src/gracket/wxs/wxs_obj.cxx b/src/gracket/wxs/wxs_obj.cxx index 8892b107ed..b32e0fc549 100644 --- a/src/gracket/wxs/wxs_obj.cxx +++ b/src/gracket/wxs/wxs_obj.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_obj.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif diff --git a/src/gracket/wxs/wxs_panl.cxx b/src/gracket/wxs/wxs_panl.cxx index 0402168da1..5d0046f79d 100644 --- a/src/gracket/wxs/wxs_panl.cxx +++ b/src/gracket/wxs/wxs_panl.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_panl.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -54,7 +60,7 @@ static void init_symset_panelStyle(void) { panelStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_panelStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_panelStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!panelStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_panelStyle()); @@ -87,7 +93,7 @@ static void init_symset_orientation(void) { orientation_wxHORIZONTAL_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("horizontal")); } -static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!orientation_wxHORIZONTAL_sym) WITH_VAR_STACK(init_symset_orientation()); @@ -99,7 +105,7 @@ static int unbundle_symset_orientation(Scheme_Object *v, const char *where) { return 0; } -static Scheme_Object *bundle_symset_orientation(int v) { +MAYBE_UNUSED static Scheme_Object *bundle_symset_orientation(int v) { if (!orientation_wxHORIZONTAL_sym) init_symset_orientation(); switch (v) { case wxVERTICAL: return orientation_wxVERTICAL_sym; @@ -1057,7 +1063,7 @@ static void init_symset_dialogStyle(void) { dialogStyle_wxNOT_AS_SHEET_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("no-sheet")); } -static int unbundle_symset_dialogStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_dialogStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!dialogStyle_wxNOT_AS_SHEET_sym) WITH_VAR_STACK(init_symset_dialogStyle()); diff --git a/src/gracket/wxs/wxs_rado.cxx b/src/gracket/wxs/wxs_rado.cxx index 760e12856f..084df6195e 100644 --- a/src/gracket/wxs/wxs_rado.cxx +++ b/src/gracket/wxs/wxs_rado.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_rado.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -55,7 +61,7 @@ static void init_symset_radioboxStyle(void) { radioboxStyle_wxHORIZONTAL_LABEL_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("horizontal-label")); } -static int unbundle_symset_radioboxStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_radioboxStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!radioboxStyle_wxHORIZONTAL_LABEL_sym) WITH_VAR_STACK(init_symset_radioboxStyle()); @@ -151,7 +157,7 @@ static void CB_TOSCHEME(CB_REALCLASS *obj, wxCommandEvent *event); -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -167,7 +173,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; @@ -259,7 +265,7 @@ static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -275,7 +281,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; diff --git a/src/gracket/wxs/wxs_slid.cxx b/src/gracket/wxs/wxs_slid.cxx index e7c5283704..ccdcb0a999 100644 --- a/src/gracket/wxs/wxs_slid.cxx +++ b/src/gracket/wxs/wxs_slid.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_slid.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -60,7 +66,7 @@ static void init_symset_sliderStyle(void) { sliderStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_sliderStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_sliderStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!sliderStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_sliderStyle()); diff --git a/src/gracket/wxs/wxs_tabc.cxx b/src/gracket/wxs/wxs_tabc.cxx index 89b33dd930..464994c6c2 100644 --- a/src/gracket/wxs/wxs_tabc.cxx +++ b/src/gracket/wxs/wxs_tabc.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_tabc.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -154,7 +160,7 @@ static void CB_TOSCHEME(CB_REALCLASS *obj, wxCommandEvent *event); -static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) +MAYBE_UNUSED static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) { Scheme_Object *cdr = scheme_null, *obj = NULL; SETUP_VAR_STACK(1); @@ -170,7 +176,7 @@ static Scheme_Object *l_MAKE_LIST(l_TYPE l_POINT *f, l_INTTYPE c) return cdr; } -static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) +MAYBE_UNUSED static l_TYPE l_POINT *l_MAKE_ARRAY(Scheme_Object *l, l_INTTYPE *c, char *who) { Scheme_Object *orig_l = l; int i = 0; @@ -235,7 +241,7 @@ static void init_symset_tabStyle(void) { tabStyle_wxBORDER_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("border")); } -static int unbundle_symset_tabStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_tabStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!tabStyle_wxBORDER_sym) WITH_VAR_STACK(init_symset_tabStyle()); @@ -1118,7 +1124,7 @@ static void init_symset_groupBoxStyle(void) { groupBoxStyle_wxINVISIBLE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("deleted")); } -static int unbundle_symset_groupBoxStyle(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_groupBoxStyle(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!groupBoxStyle_wxINVISIBLE_sym) WITH_VAR_STACK(init_symset_groupBoxStyle()); diff --git a/src/gracket/wxs/wxs_win.cxx b/src/gracket/wxs/wxs_win.cxx index 101cf5feb8..055c2996d1 100644 --- a/src/gracket/wxs/wxs_win.cxx +++ b/src/gracket/wxs/wxs_win.cxx @@ -2,6 +2,12 @@ /* This file was generated by xctocc from "wxs_win.xc". */ +#if defined(__GNUC__) +# define MAYBE_UNUSED __attribute__((unused)) +#else +# define MAYBE_UNUSED +#endif + #if defined(_MSC_VER) # include "wx.h" #endif @@ -138,7 +144,7 @@ static void init_symset_sizeMode(void) { sizeMode_wxPOS_USE_MINUS_ONE_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("use-minus-one")); } -static int unbundle_symset_sizeMode(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_sizeMode(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!sizeMode_wxPOS_USE_MINUS_ONE_sym) WITH_VAR_STACK(init_symset_sizeMode()); @@ -166,7 +172,7 @@ static void init_symset_direction(void) { direction_wxHORIZONTAL_sym = WITH_REMEMBERED_STACK(scheme_intern_symbol("horizontal")); } -static int unbundle_symset_direction(Scheme_Object *v, const char *where) { +MAYBE_UNUSED static int unbundle_symset_direction(Scheme_Object *v, const char *where) { SETUP_VAR_STACK(1); VAR_STACK_PUSH(0, v); if (!direction_wxHORIZONTAL_sym) WITH_VAR_STACK(init_symset_direction()); diff --git a/src/racket/utils/xctocc b/src/racket/utils/xctocc index faca6219cd..4a83097ddb 100755 --- a/src/racket/utils/xctocc +++ b/src/racket/utils/xctocc @@ -2974,20 +2974,20 @@ sub PrintSymSet if ($#syms < 0) { if (!($omit =~ /PRED/)) { - print "static int istype_symset_${name}(Scheme_Object *v, const char *where) {\n"; + print "MAYBE_UNUSED static int istype_symset_${name}(Scheme_Object *v, const char *where) {\n"; print " if SCHEME_NULLP(v) return 1;\n"; print " if (where) scheme_wrong_type(where, \"$name symbol${lname}\", -1, 0, &v);\n"; print " return 0;\n"; print "}\n\n"; } if (!($omit =~ /UNBUNDLE/)) { - print "static int unbundle_symset_${name}(Scheme_Object *v, const char *where) {\n"; + print "MAYBE_UNUSED static int unbundle_symset_${name}(Scheme_Object *v, const char *where) {\n"; print " istype_symset_${name}(v, where);\n"; print " return 0;\n"; print "}\n"; } if (!($omit =~ /BUNDLE/)) { - print "static Scheme_Object *bundle_symset_${name}(int) {\n"; + print "MAYBE_UNUSED static Scheme_Object *bundle_symset_${name}(int) {\n"; print " return scheme_null;\n"; print "}\n\n"; } @@ -3017,7 +3017,7 @@ sub PrintSymSet } if ($dothisone) { - print "static int ${mode}_symset_${name}(Scheme_Object *v, const char *where) {\n"; + print "MAYBE_UNUSED static int ${mode}_symset_${name}(Scheme_Object *v, const char *where) {\n"; print " SETUP_VAR_STACK(1);\n"; print " VAR_STACK_PUSH(0, v);\n"; print " if (!${name}_${v}_sym) WITH_VAR_STACK(init_symset_${name}());\n"; @@ -3079,7 +3079,7 @@ sub PrintSymSet } if (!($omit =~ /BUNDLE/)) { - print "static Scheme_Object *bundle_symset_${name}(int v) {\n"; + print "MAYBE_UNUSED static Scheme_Object *bundle_symset_${name}(int v) {\n"; if ($multi) { print " REMEMBER_VAR_STACK();\n"; }