Remove unused variables in system/language.
authorLudovic Courtès <ludo@gnu.org>
Sun, 20 Sep 2009 22:35:19 +0000 (00:35 +0200)
committerLudovic Courtès <ludo@gnu.org>
Sun, 20 Sep 2009 22:36:31 +0000 (00:36 +0200)
commite5f5113c21f396705d7479a570c96690135c9d36
tree5cef5937b403ce841b70e49f80f69b658357caed
parenta2ca7252121e968798b0638b758ea99d7bf62409
Remove unused variables in system/language.

* module/language/assembly.scm (byte-length): Don't match unused
  record slots.

* module/language/tree-il.scm (tree-il->scheme, post-order!,
  pre-order!): Likewise.

* module/language/tree-il/analyze.scm (analyze-lexicals): Likewise.

* module/language/tree-il/compile-glil.scm (flatten): Likewise.

* module/language/assembly/disassemble.scm (disassemble-load-program):
  Don't match unused list elements.

* module/language/glil/decompile-assembly.scm (decompile-toplevel,
  decompile-load-program): Likewise.

* module/system/xref.scm (program-callee-rev-vars): Likewise.

* module/language/assembly/compile-bytecode.scm
  (write-bytecode)[write-sized-loader]: Remove.

* module/language/assembly/decompile-bytecode.scm (decode-load-program):
  Factorize `pad' variables.

* module/language/ecmascript/base.scm (object->value/string,
  object->value/number)[v]: Remove.

* module/language/ecmascript/tokenize.scm (read-slash)[c0]: Remove.

* module/language/objcode/spec.scm (decompile-value)[nargs]: Remove.

* module/system/repl/command.scm (time)[vms-start, vms-end]: Remove.

* module/system/repl/repl.scm (prompting-meta-read): Use `prompt'.
14 files changed:
module/language/assembly.scm
module/language/assembly/compile-bytecode.scm
module/language/assembly/decompile-bytecode.scm
module/language/assembly/disassemble.scm
module/language/ecmascript/base.scm
module/language/ecmascript/tokenize.scm
module/language/glil/decompile-assembly.scm
module/language/objcode/spec.scm
module/language/tree-il.scm
module/language/tree-il/analyze.scm
module/language/tree-il/compile-glil.scm
module/system/repl/command.scm
module/system/repl/repl.scm
module/system/xref.scm