Index: TECH/File/impl/FileReader.cls.xml
===================================================================
diff -u -r912 -r913
--- TECH/File/impl/FileReader.cls.xml	(.../FileReader.cls.xml)	(revision 912)
+++ TECH/File/impl/FileReader.cls.xml	(.../FileReader.cls.xml)	(revision 913)
@@ -3,7 +3,7 @@
 <Class name="TECH.File.impl.FileReader">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%RegisteredObject</Super>
+<Super>TECH.RegisteredObject,TECH.File.FileReader</Super>
 
 <Property name="Bestand">
 <Type>%String</Type>
@@ -39,6 +39,7 @@
 </Method>
 
 <Method name="GeefStream">
+<ReturnType>%FileCharacterStream</ReturnType>
 <Implementation><![CDATA[	quit ..FileCharacterStream
 ]]></Implementation>
 </Method>
@@ -56,7 +57,7 @@
 Resultaat -1 = einde van bestand.</Description>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Set Line = ""
+	#dim Line As %String = ""
 	If ('..FileCharacterStream.AtEnd){
 		Set Line = ..FileCharacterStream.ReadLine()
 	}