Index: library/mongodb/tests/nsf-gridfs.test
===================================================================
diff -u -r78c12b94b4cdcd5edb70a546b7bbb7c0a4724668 -ra3b62596dcbcf7e1a7f7368bcb37213ad529c94e
--- library/mongodb/tests/nsf-gridfs.test	(.../nsf-gridfs.test)	(revision 78c12b94b4cdcd5edb70a546b7bbb7c0a4724668)
+++ library/mongodb/tests/nsf-gridfs.test	(.../nsf-gridfs.test)	(revision a3b62596dcbcf7e1a7f7368bcb37213ad529c94e)
@@ -37,6 +37,7 @@
 set fn [glob -tails -directory $dir -- README.md]
 ? {llength $fn} 1
 ? {file readable [file join $dir $fn]} 1
+set fileSize [file size $fn]
 
 # gridfs::remove_file removes all files with the specified name
 # multiple store operations create "revisions" with different uploadDates
@@ -74,7 +75,7 @@
     }
   }
   set chunks
-} 6
+} [expr {$fileSize/1000 + 1}]
 ? {mongo::gridfile::close $f} ""
 
 #