unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/copy-files-simple.t

@@ -0,0 +1,64 @@
+Test simple interactions between melange.emit and copy_files
+
+  $ cat > dune-project <<EOF
+  > (lang dune 3.8)
+  > (using melange 0.1)
+  > EOF
+
+  $ cat > dune <<EOF
+  > (melange.emit
+  >  (target output)
+  >  (emit_stdlib false)
+  >  (libraries melange.node)
+  >  (preprocess (pps melange.ppx))
+  >  (alias mel))
+  > 
+  > (copy_files
+  >  (alias mel)
+  >  (files assets/file.txt))
+  > EOF
+
+  $ mkdir assets
+  $ cat > assets/file.txt <<EOF
+  > hello from file
+  > EOF
+
+  $ cat > main.ml <<EOF
+  > let dirname = [%mel.raw "__dirname"]
+  > let file_path = "../assets/file.txt"
+  > let file_content = Node.Fs.readFileSync (dirname ^ "/" ^ file_path) \`utf8
+  > let () = Js.log file_content
+  > EOF
+
+  $ dune build @mel
+  $ node _build/default/output/main.js
+  hello from file
+  
+
+
+Copy the file into the output folder, so we can use same path as in-source
+
+  $ cat > dune <<EOF
+  > (melange.emit
+  >  (target output)
+  >  (emit_stdlib false)
+  >  (libraries melange.node)
+  >  (preprocess (pps melange.ppx))
+  >  (alias mel))
+  > 
+  > (subdir output
+  >  (subdir assets
+  >   (copy_files (alias mel) (files %{project_root}/assets/file.txt))))
+  > EOF
+
+  $ cat > main.ml <<EOF
+  > let dirname = [%mel.raw "__dirname"]
+  > let file_path = "assets/file.txt"
+  > let file_content = Node.Fs.readFileSync (dirname ^ "/" ^ file_path) \`utf8
+  > let () = Js.log file_content
+  > EOF
+
+  $ dune build @mel
+  $ node _build/default/output/main.js
+  hello from file
+