[Guile-commits] 04/06: Add 'movi' test.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guile.

commit 24ef197b1269f8371b1f4a412caa6d2b99d66839
Author: Dale P. Smith <dalepsmith@gmail.com>
AuthorDate: Sat Jun 20 16:28:44 2020 +0200

    Add 'movi' test.
    
    This is a followup to 1bb909a44d2303f88bb05125fc6742e97f80cd1d.  It
    reproduces the bug that 1bb909a44d2303f88bb05125fc6742e97f80cd1d fixes
    on ARMv7.
    
    * tests/movi.c: New file.
    
    Co-authored-by: Ludovic Courtès <ludo@gnu.org>
---
 tests/movi.c | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/tests/movi.c b/tests/movi.c
new file mode 100644
index 0000000..fcdd656
--- /dev/null
+++ b/tests/movi.c
@@ -0,0 +1,22 @@
+#include "test.h"
+
+static void
+run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size)
+{
+  jit_begin(j, arena_base, arena_size);
+  size_t align = jit_enter_jit_abi(j, 0, 0, 0);
+
+  jit_movi(j, JIT_R0, 0xa500a500);
+  jit_leave_jit_abi(j, 0, 0, align);
+  jit_retr(j, JIT_R0);
+
+  jit_uword_t (*f)(void) = jit_end(j, NULL);
+
+  ASSERT(f() == 0xa500a500);
+}
+
+int
+main (int argc, char *argv[])
+{
+  return main_helper(argc, argv, run_test);
+}