@@ -81,6 +81,8 @@ file flags filePath ext = output_directory flags </> replaceExtension filePath e
8181
8282elmo :: Flags -> FilePath -> FilePath
8383elmo flags filePath = file flags filePath "elmo"
84+
85+elmi :: Flags -> FilePath -> FilePath
8486elmi flags filePath = file flags filePath "elmi"
8587
8688