X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=src%2Fent%2Fent.c;h=885e181253320d494307834181781461954b7915;hb=HEAD;hp=4d48bc994bdde10f72602d87e925ffd2031c3509;hpb=51b9dd462d23dd8dcc7eeebfc434842c31813314;p=sxemacs diff --git a/src/ent/ent.c b/src/ent/ent.c index 4d48bc9..885e181 100644 --- a/src/ent/ent.c +++ b/src/ent/ent.c @@ -253,9 +253,9 @@ Return t if OBJECT is a real, nil otherwise. } static int -default_real_precision_changed (Lisp_Object sym, Lisp_Object *val, - Lisp_Object in_object, - int flags) +default_real_precision_changed (Lisp_Object SXE_UNUSED(sym), Lisp_Object *val, + Lisp_Object SXE_UNUSED(in_object), + int SXE_UNUSED(flags)) { unsigned long prec; @@ -270,11 +270,6 @@ default_real_precision_changed (Lisp_Object sym, Lisp_Object *val, bigfr_set_default_prec(prec); #endif return 0; - - /* less warnings */ - if (sym == Qnil); - if (in_object == Qnil); - if (flags); } DEFUN("real", Freal, 1, 2, 0, /*