[WIP][ADD]New macros for odoo and testing
This commit is contained in:
parent
97afd350f7
commit
1a44194047
@ -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"
|
||||||
|
@ -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))
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user