Index: TECH/File/impl/FileUtils.cls.xml
===================================================================
diff -u -r2616 -r3385
--- TECH/File/impl/FileUtils.cls.xml	(.../FileUtils.cls.xml)	(revision 2616)
+++ TECH/File/impl/FileUtils.cls.xml	(.../FileUtils.cls.xml)	(revision 3385)
@@ -13,9 +13,9 @@
 </Method>
 
 <Method name="GetFileList">
-<FormalSpec>Directory:%String,FileMask:%String="*.*",AddSubDir:%Boolean=1,IncludeDirs:%Boolean=0</FormalSpec>
+<FormalSpec>Directory:%String,FileMask:%String="*.*",AddSubDir:%Boolean=1,IncludeDirs:%Boolean=0,NumberOfFiles:%Numeric=0</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
-<Implementation><![CDATA[	Quit ##class(TECH.Files).%New().GetFileList(Directory, FileMask, AddSubDir, IncludeDirs)
+<Implementation><![CDATA[	Quit ##class(TECH.Files).%New().GetFileList(Directory, FileMask, AddSubDir, IncludeDirs,NumberOfFiles)
 ]]></Implementation>
 </Method>