diff --git a/XSuperObject.pas b/XSuperObject.pas
index ebe1ef6..d0ca7c2 100644
--- a/XSuperObject.pas
+++ b/XSuperObject.pas
@@ -1295,7 +1295,7 @@ class function TSuperObject.ParseFile(FileName: String; CheckDate: Boolean = Tru
 class function TSuperObject.ParseStream(Stream: TStream; CheckDate: Boolean): TSuperObject;
 var
   Strm: TStringStream;
-  preamble, tmp: TBytes;
+  tmp: TBytes;
   preambleLength: integer;
   enc: TEncoding;
 begin