Skip to content

Commit

Permalink
WIP: Fix workspace tests
Browse files Browse the repository at this point in the history
  • Loading branch information
gmlarumbe committed Aug 14, 2023
1 parent c5d52e4 commit 1f53d8e
Showing 1 changed file with 12 additions and 4 deletions.
16 changes: 12 additions & 4 deletions test/verilog-ext-tests-workspace.el
Original file line number Diff line number Diff line change
Expand Up @@ -29,21 +29,29 @@
(let* ((verilog-ext-workspace-root-dir verilog-ext-tests-test-dir)
(verilog-ext-workspace-ignore-dirs `(,(file-name-concat verilog-ext-workspace-root-dir "files/indent")
,(file-name-concat verilog-ext-workspace-root-dir "files/verilog-mode")
,(file-name-concat verilog-ext-workspace-root-dir "files/bugs")))
,(file-name-concat verilog-ext-workspace-root-dir "files/bugs")
,(file-name-concat verilog-ext-workspace-root-dir "files/tree-sitter")))
(verilog-ext-workspace-ignore-files `(,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/axi_demux.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/axi_demux.ts.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/instances.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/ucontroller.beauty.sv"))))
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/instances.ts.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/ucontroller.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/ucontroller.ts.beauty.sv"))))
(mapcar (lambda (file) (string-remove-prefix (file-name-as-directory verilog-ext-workspace-root-dir) file))
(verilog-ext-workspace-files))))

(ert-deftest workspace::files ()
(let* ((verilog-ext-workspace-root-dir verilog-ext-tests-test-dir)
(verilog-ext-workspace-ignore-dirs `(,(file-name-concat verilog-ext-workspace-root-dir "files/indent")
,(file-name-concat verilog-ext-workspace-root-dir "files/verilog-mode")
,(file-name-concat verilog-ext-workspace-root-dir "files/bugs")))
,(file-name-concat verilog-ext-workspace-root-dir "files/bugs")
,(file-name-concat verilog-ext-workspace-root-dir "files/tree-sitter")))
(verilog-ext-workspace-ignore-files `(,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/axi_demux.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/axi_demux.ts.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/instances.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/ucontroller.beauty.sv"))))
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/instances.ts.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/ucontroller.beauty.sv")
,(file-name-concat verilog-ext-workspace-root-dir "files/beautify/ucontroller.ts.beauty.sv"))))
(should (equal (mapcar (lambda (file) (string-remove-prefix (file-name-as-directory verilog-ext-workspace-root-dir) file))
(verilog-ext-workspace-files))
'("files/common/axi_demux.sv"
Expand Down

0 comments on commit 1f53d8e

Please sign in to comment.