--- a/JavaMethod.st	Mon Aug 18 18:29:58 1997 +0000
+++ b/JavaMethod.st	Mon Aug 18 18:35:10 1997 +0000
@@ -48,7 +48,7 @@
 argSigArrayFromSignature:aSignature
     "given a signature, return a specArray for the arguments"
 
-    |s argSpec retvalSpec|
+    |s|
 
     s := aSignature readStream.
     s next ~~ $( ifTrue:[self halt].
@@ -84,7 +84,7 @@
 argSpecFromSignature:aSignature withName:name
     "given a signature, return a spec"
 
-    |s argSpec retvalSpec|
+    |s argSpec|
 
     s := aSignature readStream.
     s next ~~ $( ifTrue:[self halt. ^ name].
@@ -172,7 +172,7 @@
 fieldTypeFromStream:s
     "parse a fieldTypeSpec - see java doc"
 
-    |typeChar typeSym spec elType size className|
+    |typeChar typeSym elType size className|
 
     ^ self fieldTypeFromStream:s in:nil.
 
@@ -208,7 +208,7 @@
 fieldTypeFromStream:s in:aPackage
     "parse a fieldTypeSpec - see java doc"
 
-    |typeChar typeSym spec elType size className nm|
+    |typeChar typeSym elType size className nm|
 
     typeChar := s next.
 
@@ -251,7 +251,7 @@
 numArgsFromSignature:aSignature
     "given a signature, return the number of args"
 
-    |s argSpec|
+    |s|
 
     s := aSignature readStream.
     s next ~~ $( ifTrue:[self halt].
@@ -268,7 +268,7 @@
 numArgsFromStream:s
     "parse an argSpec - see java doc"
 
-    |argSpec n t|
+    |n t|
 
     n := 0.
     [s atEnd or:[s peek == $)]] whileFalse:[
@@ -342,7 +342,7 @@
 returnTypeFromSignature:aSignature
     "given a signature, return its type as a string"
 
-    |s c argSpec retvalSpec|
+    |s c|
 
     ^ self returnTypeFromSignature:aSignature in:nil.
 
@@ -376,7 +376,7 @@
 returnTypeFromSignature:aSignature in:aPackage
     "given a signature, return its type as a string"
 
-    |s c argSpec retvalSpec|
+    |s c|
 
     s := aSignature readStream.
     (c := s peek) ~~ $( ifTrue:[
@@ -418,8 +418,6 @@
 retvalSpecFromStream:s
     "parse a retvalSpec - see java doc"
 
-    |argSpec spec|
-
     ^ self retvalSpecFromStream:s in:nil.
 
     s atEnd ifTrue:[self halt. ^ #void].
@@ -432,8 +430,6 @@
 retvalSpecFromStream:s in:aPackage
     "parse a retvalSpec - see java doc"
 
-    |argSpec spec|
-
     s atEnd ifTrue:[self halt. ^ #void].
     s peek == $V ifTrue:[^ #void].
     ^ self fieldTypeFromStream:s in:aPackage
@@ -589,7 +585,7 @@
 typeFromSignature:aSignature
     "given a signature, return its type as a string"
 
-    |s c argSpec retvalSpec|
+    |s c|
 
     s := aSignature readStream.
     (c := s peek) ~~ $( ifTrue:[
@@ -623,7 +619,7 @@
 typeFromSignature:aSignature in:package
     "given a signature, return its type as a string"
 
-    |s c argSpec retvalSpec|
+    |s c|
 
     s := aSignature readStream.
     (c := s peek) ~~ $( ifTrue:[
@@ -1329,6 +1325,6 @@
 !JavaMethod class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaMethod.st,v 1.51 1997/08/18 18:29:58 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaMethod.st,v 1.52 1997/08/18 18:35:10 cg Exp $'
 ! !
 JavaMethod initialize!