fix style of threadp, mutexp, and condition-variable-p

This commit is contained in:
Tom Tromey 2013-08-27 12:33:04 -06:00
parent 6a64a7118d
commit c44fedc603

View file

@ -547,8 +547,7 @@ DEFUN ("threadp", Fthreadp, Sthreadp, 1, 1, 0,
{
if (THREADP (object))
return Qt;
else
return Qnil;
return Qnil;
}
DEFUN ("mutexp", Fmutexp, Smutexp, 1, 1, 0,
@ -557,8 +556,7 @@ DEFUN ("mutexp", Fmutexp, Smutexp, 1, 1, 0,
{
if (MUTEXP (object))
return Qt;
else
return Qnil;
return Qnil;
}
DEFUN ("condition-variable-p", Fcondition_variable_p, Scondition_variable_p,
@ -568,8 +566,7 @@ DEFUN ("condition-variable-p", Fcondition_variable_p, Scondition_variable_p,
{
if (CONDVARP (object))
return Qt;
else
return Qnil;
return Qnil;
}
/* Extract and set components of lists. */