Remove unused variable
This commit is contained in:
parent
4e451a1b79
commit
7d8c520480
|
@ -226,7 +226,6 @@ Scheme_Object *scheme_make_sema(long v)
|
|||
static Scheme_Object *make_sema(int n, Scheme_Object **p)
|
||||
{
|
||||
long v;
|
||||
Scheme_Object *s;
|
||||
|
||||
if (n) {
|
||||
if (!SCHEME_INTP(p[0])) {
|
||||
|
|
Loading…
Reference in New Issue
Block a user