@@ -417,8 +417,8 @@ pub fn compiler_args(
417417
418418 specs
419419 . iter ( )
420- . map ( |spec| {
421- return vec ! [
420+ . flat_map ( |spec| {
421+ vec ! [
422422 "-bs-package-output" . to_string( ) ,
423423 format!(
424424 "{}:{}:{}" ,
@@ -437,9 +437,8 @@ pub fn compiler_args(
437437 } ,
438438 root_config. get_suffix( spec) ,
439439 ) ,
440- ] ;
440+ ]
441441 } )
442- . flatten ( )
443442 . collect ( )
444443 } ;
445444
@@ -614,8 +613,7 @@ fn compile_file(
614613 Err ( stderr. to_string ( ) + & stdout)
615614 }
616615 Err ( e) => Err ( format ! (
617- "Could not compile file. Error: {}. Path to AST: {:?}" ,
618- e, ast_path
616+ "Could not compile file. Error: {e}. Path to AST: {ast_path:?}"
619617 ) ) ,
620618 Ok ( x) => {
621619 let err = std:: str:: from_utf8 ( & x. stderr )
@@ -633,15 +631,15 @@ fn compile_file(
633631 // because editor tooling doesn't support namespace entries yet
634632 // we just remove the @ for now. This makes sure the editor support
635633 // doesn't break
636- . join ( format ! ( "{}.cmi" , module_name ) ) ,
637- ocaml_build_path_abs. join ( format ! ( "{}.cmi" , module_name ) ) ,
634+ . join ( format ! ( "{module_name }.cmi" ) ) ,
635+ ocaml_build_path_abs. join ( format ! ( "{module_name }.cmi" ) ) ,
638636 ) ;
639637 let _ = std:: fs:: copy (
640638 package
641639 . get_build_path ( )
642640 . join ( dir)
643- . join ( format ! ( "{}.cmj" , module_name ) ) ,
644- ocaml_build_path_abs. join ( format ! ( "{}.cmj" , module_name ) ) ,
641+ . join ( format ! ( "{module_name }.cmj" ) ) ,
642+ ocaml_build_path_abs. join ( format ! ( "{module_name }.cmj" ) ) ,
645643 ) ;
646644 let _ = std:: fs:: copy (
647645 package
@@ -650,98 +648,91 @@ fn compile_file(
650648 // because editor tooling doesn't support namespace entries yet
651649 // we just remove the @ for now. This makes sure the editor support
652650 // doesn't break
653- . join ( format ! ( "{}.cmt" , module_name ) ) ,
654- ocaml_build_path_abs. join ( format ! ( "{}.cmt" , module_name ) ) ,
651+ . join ( format ! ( "{module_name }.cmt" ) ) ,
652+ ocaml_build_path_abs. join ( format ! ( "{module_name }.cmt" ) ) ,
655653 ) ;
656654 } else {
657655 let _ = std:: fs:: copy (
658656 package
659657 . get_build_path ( )
660658 . join ( dir)
661- . join ( format ! ( "{}.cmti" , module_name ) ) ,
662- ocaml_build_path_abs. join ( format ! ( "{}.cmti" , module_name ) ) ,
659+ . join ( format ! ( "{module_name }.cmti" ) ) ,
660+ ocaml_build_path_abs. join ( format ! ( "{module_name }.cmti" ) ) ,
663661 ) ;
664662 let _ = std:: fs:: copy (
665663 package
666664 . get_build_path ( )
667665 . join ( dir)
668- . join ( format ! ( "{}.cmi" , module_name ) ) ,
669- ocaml_build_path_abs. join ( format ! ( "{}.cmi" , module_name ) ) ,
666+ . join ( format ! ( "{module_name }.cmi" ) ) ,
667+ ocaml_build_path_abs. join ( format ! ( "{module_name }.cmi" ) ) ,
670668 ) ;
671669 }
672670
673- match & module. source_type {
674- SourceType :: SourceFile ( SourceFile {
675- interface : Some ( Interface { path, .. } ) ,
676- ..
677- } ) => {
678- // we need to copy the source file to the build directory.
679- // editor tools expects the source file in lib/bs for finding the current package
680- // and in lib/ocaml when referencing modules in other packages
681- let _ = std:: fs:: copy (
682- Path :: new ( & package. path ) . join ( path) ,
683- package. get_build_path ( ) . join ( path) ,
684- )
685- . expect ( "copying source file failed" ) ;
686-
687- let _ = std:: fs:: copy (
688- Path :: new ( & package. path ) . join ( path) ,
689- package
690- . get_ocaml_build_path ( )
691- . join ( std:: path:: Path :: new ( path) . file_name ( ) . unwrap ( ) ) ,
692- )
693- . expect ( "copying source file failed" ) ;
694- }
695- _ => ( ) ,
671+ if let SourceType :: SourceFile ( SourceFile {
672+ interface : Some ( Interface { path, .. } ) ,
673+ ..
674+ } ) = & module. source_type
675+ {
676+ // we need to copy the source file to the build directory.
677+ // editor tools expects the source file in lib/bs for finding the current package
678+ // and in lib/ocaml when referencing modules in other packages
679+ let _ = std:: fs:: copy (
680+ Path :: new ( & package. path ) . join ( path) ,
681+ package. get_build_path ( ) . join ( path) ,
682+ )
683+ . expect ( "copying source file failed" ) ;
684+
685+ let _ = std:: fs:: copy (
686+ Path :: new ( & package. path ) . join ( path) ,
687+ package
688+ . get_ocaml_build_path ( )
689+ . join ( std:: path:: Path :: new ( path) . file_name ( ) . unwrap ( ) ) ,
690+ )
691+ . expect ( "copying source file failed" ) ;
696692 }
697- match & module. source_type {
698- SourceType :: SourceFile ( SourceFile {
699- implementation : Implementation { path, .. } ,
700- ..
701- } ) => {
702- // we need to copy the source file to the build directory.
703- // editor tools expects the source file in lib/bs for finding the current package
704- // and in lib/ocaml when referencing modules in other packages
705- let _ = std:: fs:: copy (
706- Path :: new ( & package. path ) . join ( path) ,
707- package. get_build_path ( ) . join ( path) ,
708- )
709- . expect ( "copying source file failed" ) ;
710-
711- let _ = std:: fs:: copy (
712- Path :: new ( & package. path ) . join ( path) ,
713- package
714- . get_ocaml_build_path ( )
715- . join ( std:: path:: Path :: new ( path) . file_name ( ) . unwrap ( ) ) ,
716- )
717- . expect ( "copying source file failed" ) ;
718- }
719- _ => ( ) ,
693+ if let SourceType :: SourceFile ( SourceFile {
694+ implementation : Implementation { path, .. } ,
695+ ..
696+ } ) = & module. source_type
697+ {
698+ // we need to copy the source file to the build directory.
699+ // editor tools expects the source file in lib/bs for finding the current package
700+ // and in lib/ocaml when referencing modules in other packages
701+ let _ = std:: fs:: copy (
702+ Path :: new ( & package. path ) . join ( path) ,
703+ package. get_build_path ( ) . join ( path) ,
704+ )
705+ . expect ( "copying source file failed" ) ;
706+
707+ let _ = std:: fs:: copy (
708+ Path :: new ( & package. path ) . join ( path) ,
709+ package
710+ . get_ocaml_build_path ( )
711+ . join ( std:: path:: Path :: new ( path) . file_name ( ) . unwrap ( ) ) ,
712+ )
713+ . expect ( "copying source file failed" ) ;
720714 }
721715
722716 // copy js file
723717 root_package. config . get_package_specs ( ) . iter ( ) . for_each ( |spec| {
724718 if spec. in_source {
725- match & module. source_type {
726- SourceType :: SourceFile ( SourceFile {
727- implementation : Implementation { path, .. } ,
728- ..
729- } ) => {
730- let source = helpers:: get_source_file_from_rescript_file (
731- & Path :: new ( & package. path ) . join ( path) ,
732- & root_package. config . get_suffix ( spec) ,
733- ) ;
734- let destination = helpers:: get_source_file_from_rescript_file (
735- & package. get_build_path ( ) . join ( path) ,
736- & root_package. config . get_suffix ( spec) ,
737- ) ;
738-
739- if source. exists ( ) {
740- let _ =
741- std:: fs:: copy ( & source, & destination) . expect ( "copying source file failed" ) ;
742- }
719+ if let SourceType :: SourceFile ( SourceFile {
720+ implementation : Implementation { path, .. } ,
721+ ..
722+ } ) = & module. source_type
723+ {
724+ let source = helpers:: get_source_file_from_rescript_file (
725+ & Path :: new ( & package. path ) . join ( path) ,
726+ & root_package. config . get_suffix ( spec) ,
727+ ) ;
728+ let destination = helpers:: get_source_file_from_rescript_file (
729+ & package. get_build_path ( ) . join ( path) ,
730+ & root_package. config . get_suffix ( spec) ,
731+ ) ;
732+
733+ if source. exists ( ) {
734+ let _ = std:: fs:: copy ( & source, & destination) . expect ( "copying source file failed" ) ;
743735 }
744- _ => ( ) ,
745736 }
746737 }
747738 } ) ;
0 commit comments