@@ -86,10 +86,15 @@
 			"-use-local"
 			"-skip-version-check"
 			)
 		 args:arg-hash
 		 0))
+
+(if (not (null? remargs))
+    (begin
+      (print "Unrecognised arguments: " (string-intersperse remargs " "))
+      (exit)))
 
 (if (args:get-arg "-h")
     (begin
       (print help)
       (exit)))