add a function to convert from kebab case (expectation for file names) to pascal case (convention used for structures)

imperative-shell/converter.sml

@@ -5,7 +5,7 @@ struct
       SOME line => loadIO (io, str ^ line)
     | NONE => str
 
-  fun convertFile fullPath =
+  fun convertFile (fullPath, filename) =
     let
       val io = TextIO.openIn fullPath
       val text = loadIO (io, "")
@@ -57,7 +57,7 @@ struct
               ()
             else if endsWithDsc path then
               (* is a file ending with .dsc extension *)
-              convertFile folderPath
+              convertFile (folderPath, path)
             else
               (* is a file but doesn't end with .dsc, so ignore *)
               ()