eoc/test-aarch64-run.scm

#lang racket

(require "test-util.scm")

(test-eq
 (compile-arm-asm "aarch64-hello.s" "a.out")
 #t)

(test-eq
 (run-arm-executable "a.out")
 42)