move indentation tests to diagram test files
This commit is contained in:
parent
12911801f0
commit
22822bed26
|
@ -312,6 +312,28 @@ together {
|
||||||
}
|
}
|
||||||
"))
|
"))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
(ert-deftest platuml-test-block-indentation/package-interface-nested ()
|
||||||
|
"Test correct indentation of two nested blocks, a package and an interface
|
||||||
|
Note: package is used in deployment and object diagrams as well, see there for more tests."
|
||||||
|
(plantuml-test-indent-block
|
||||||
|
"
|
||||||
|
package foo {
|
||||||
|
interface Bar {
|
||||||
|
baz
|
||||||
|
}
|
||||||
|
}
|
||||||
|
"
|
||||||
|
"
|
||||||
|
package foo {
|
||||||
|
interface Bar {
|
||||||
|
baz
|
||||||
|
}
|
||||||
|
}
|
||||||
|
"))
|
||||||
|
|
||||||
|
|
||||||
(provide 'plantuml-indentation-class-test)
|
(provide 'plantuml-indentation-class-test)
|
||||||
|
|
||||||
;;; plantuml-indentation-class-test.el ends here
|
;;; plantuml-indentation-class-test.el ends here
|
||||||
|
|
|
@ -86,6 +86,26 @@ storage Foo7 {
|
||||||
}
|
}
|
||||||
"))
|
"))
|
||||||
|
|
||||||
|
(ert-deftest plantuml-test-block-indentation/package-database-nested ()
|
||||||
|
"Test correct indentation of two nested blocks, a package and a database.
|
||||||
|
Note: package is used in class and object diagrams as well, see there for more tests."
|
||||||
|
(plantuml-test-indent-block
|
||||||
|
"
|
||||||
|
package APackage {
|
||||||
|
database ADatabase {
|
||||||
|
A -> B
|
||||||
|
}
|
||||||
|
}
|
||||||
|
"
|
||||||
|
"
|
||||||
|
package APackage {
|
||||||
|
database ADatabase {
|
||||||
|
A -> B
|
||||||
|
}
|
||||||
|
}
|
||||||
|
"))
|
||||||
|
|
||||||
|
|
||||||
(provide 'plantuml-indentation-deployment-test)
|
(provide 'plantuml-indentation-deployment-test)
|
||||||
|
|
||||||
;;; plantuml-indentation-deployment-test.el ends here
|
;;; plantuml-indentation-deployment-test.el ends here
|
||||||
|
|
|
@ -269,44 +269,6 @@ package APackage ()
|
||||||
package APackage ()
|
package APackage ()
|
||||||
"))
|
"))
|
||||||
|
|
||||||
(ert-deftest plantuml-test-block-indentation/package ()
|
|
||||||
"Test correct indentation of a package block."
|
|
||||||
(plantuml-test-indent-block
|
|
||||||
"
|
|
||||||
package APackage {
|
|
||||||
A -> B
|
|
||||||
}
|
|
||||||
"
|
|
||||||
"
|
|
||||||
package APackage {
|
|
||||||
A -> B
|
|
||||||
}
|
|
||||||
"))
|
|
||||||
|
|
||||||
(ert-deftest platuml-test-block-indentation/class ()
|
|
||||||
"Test correct indentation of a class block"
|
|
||||||
(plantuml-test-indent-block
|
|
||||||
"
|
|
||||||
class Foo {
|
|
||||||
+bar()
|
|
||||||
}
|
|
||||||
"
|
|
||||||
"
|
|
||||||
class Foo {
|
|
||||||
+bar()
|
|
||||||
}
|
|
||||||
")
|
|
||||||
(plantuml-test-indent-block
|
|
||||||
"
|
|
||||||
abstract class Foo {
|
|
||||||
+bar()
|
|
||||||
}
|
|
||||||
"
|
|
||||||
"
|
|
||||||
abstract class Foo {
|
|
||||||
+bar()
|
|
||||||
}
|
|
||||||
"))
|
|
||||||
|
|
||||||
(ert-deftest platuml-test-block-indentation/box ()
|
(ert-deftest platuml-test-block-indentation/box ()
|
||||||
"Test correct indentation of a box block"
|
"Test correct indentation of a box block"
|
||||||
|
@ -325,43 +287,6 @@ end box
|
||||||
" ))
|
" ))
|
||||||
|
|
||||||
|
|
||||||
(ert-deftest plantuml-test-block-indentation/package-database-nested ()
|
|
||||||
"Test correct indentation of two nested blocks, a package and a database.
|
|
||||||
Note: currently the inner database is not indented."
|
|
||||||
(plantuml-test-indent-block
|
|
||||||
"
|
|
||||||
package APackage {
|
|
||||||
database ADatabase {
|
|
||||||
A -> B
|
|
||||||
}
|
|
||||||
}
|
|
||||||
"
|
|
||||||
"
|
|
||||||
package APackage {
|
|
||||||
database ADatabase {
|
|
||||||
A -> B
|
|
||||||
}
|
|
||||||
}
|
|
||||||
"))
|
|
||||||
|
|
||||||
(ert-deftest platuml-test-block-indentation/package-interface-nested ()
|
|
||||||
"Test correct indentation of two nested blocks, a package and an interface"
|
|
||||||
(plantuml-test-indent-block
|
|
||||||
"
|
|
||||||
package foo {
|
|
||||||
interface Bar {
|
|
||||||
baz
|
|
||||||
}
|
|
||||||
}
|
|
||||||
"
|
|
||||||
"
|
|
||||||
package foo {
|
|
||||||
interface Bar {
|
|
||||||
baz
|
|
||||||
}
|
|
||||||
}
|
|
||||||
"))
|
|
||||||
|
|
||||||
(ert-deftest plantuml-test-block-indentation/alt-end ()
|
(ert-deftest plantuml-test-block-indentation/alt-end ()
|
||||||
"Test correct indentation of an alt-end block.
|
"Test correct indentation of an alt-end block.
|
||||||
The alt-keyword is NOT followed by some text."
|
The alt-keyword is NOT followed by some text."
|
||||||
|
|
Loading…
Reference in New Issue