@@ -348,7 +348,11 @@ let process_display_file com classes =
| [name] ->
classes := path :: !classes;
DPKNormal path
- | _ ->
+ | [name;target] ->
+ let path = fst path, name in
+ classes := path :: !classes;
+ DPKNormal path
+ | e ->
assert false
in
path
@@ -0,0 +1,3 @@
+class Main {
+ static function main() {}
+}
+-main Main
+-js bin/test.js
+--display Main.js.hx@0@diagnostics