Repositories / ecl.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 2d8dbea)
Remove unused variables in stacks.d
authorJuan Jose Garcia Ripoll <jjgarcia@jjgr-2.local>
Fri, 22 Jan 2010 18:37:57 +0000 (19:37 +0100)
committerJuan Jose Garcia Ripoll <jjgarcia@jjgr-2.local>
Fri, 22 Jan 2010 18:37:57 +0000 (19:37 +0100)
src/c/stacks.d patch | blob | blame | history

diff --git a/src/c/stacks.d b/src/c/stacks.d
index f2e4cd7..d54e255 100644 (file)
--- a/src/c/stacks.d
+++ b/src/c/stacks.d
@@ -155,7 +155,7 @@ ecl_bds_bind_special_case(cl_object s)
 void
 ecl_bds_bind(cl_env_ptr env, cl_object s, cl_object value)
 {
-        cl_object bindings, *location, old_value;
+        cl_object *location;
         struct bds_bd *slot;
         cl_index index = s->symbol.binding;
  AGAIN:
@@ -174,7 +174,7 @@ ecl_bds_bind(cl_env_ptr env, cl_object s, cl_object value)
 void
 ecl_bds_push(cl_env_ptr env, cl_object s)
 {
-        cl_object bindings, *location, old_value;
+        cl_object *location;
         struct bds_bd *slot;
         cl_index index = s->symbol.binding;
  AGAIN:
Embeddable Common Lisp (Official: https://gitlab.com/embeddable-common-lisp/ecl)