[WIP][ADD]New macros for odoo and testing

This commit is contained in:
Fabien BOURGEOIS 2021-02-18 11:29:17 +01:00
parent 97afd350f7
commit 1a44194047
2 changed files with 6 additions and 3 deletions

View File

@ -31,9 +31,10 @@
value (if (string? value) f"'{value}'" value)) value (if (string? value) f"'{value}'" value))
(return f"('{field}', '{op}', {value})"))) (return f"('{field}', '{op}', {value})")))
(defmacro o-mod [model-name] (defmacro o-cmod [model-name] `(. cls env [~model-name]))
"Odoo self.env model shortcut" (defmacro o-mod [model-name] `(. self env [~model-name]))
`(. self env [~model-name])) (defmacro o-cref [ref-name] `((. cls env ref) ~ref-name))
(defmacro o-ref [ref-name] `((. self env ref) ~ref-name))
(defmacro hydm [hy-domain] (defmacro hydm [hy-domain]
"Generate Odoo domain from Hy like tuple domain" "Generate Odoo domain from Hy like tuple domain"

View File

@ -18,6 +18,8 @@
" Hy Odoo Tests Helpers and Macros " " Hy Odoo Tests Helpers and Macros "
(defmacro o-assert-equal [left right] `(.assertEqual self ~left ~right)) (defmacro o-assert-equal [left right] `(.assertEqual self ~left ~right))
(defmacro o-assert-true [val] `(.assertTrue self ~val))
(defmacro o-assert-false [val] `(.assertFalse self ~val))
(defmacro o-assert-in [left right] `(.assertIn self ~left ~right)) (defmacro o-assert-in [left right] `(.assertIn self ~left ~right))
(defmacro o-assert-raises [Error] `(.assertRaises self ~Error)) (defmacro o-assert-raises [Error] `(.assertRaises self ~Error))