Use typereps for registering oracles

2019-06-07 13:10:13 +02:00 · 2019-06-07 13:10:13 +02:00 · 0d57563b49
commit 0d57563b49
parent 2357813f49
2 changed files with 6 additions and 0 deletions
--- a/test/aeb_fate_asm_test.erl
+++ b/test/aeb_fate_asm_test.erl
@ -47,6 +47,7 @@ sources() ->
    , "tuple"
    , "mapofmap"
    , "immediates"
+    , "oracles"
 %%    , "all_instructions"
    ].

--- a/test/asm_code/oracles.fate
+++ b/test/asm_code/oracles.fate
@ -0,0 +1,5 @@
+;; CONTRACT oracles
+
+FUNCTION register (address, integer) : oracle
+  ORACLE_REGISTER a arg0 () arg1 'string '{variant, [{tuple, []}, {tuple, [integer]}]}
+  RETURN