From b93232c3936da2c17e2b4aeb98705b1f8b803a82 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Wed, 1 Jun 2022 22:57:03 -0400
Subject: [PATCH] Temporary test file

---
 test-bn.scm | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 test-bn.scm

diff --git a/test-bn.scm b/test-bn.scm
new file mode 100644
index 00000000..a6f6865a
--- /dev/null
+++ b/test-bn.scm
@@ -0,0 +1,8 @@
+(import (scheme base) (scheme write) (scheme repl))
+
+ (define-c bn-test
+   "(void *data, int argc, closure _, object k, object fx)"
+   " object bn = Cyc_int2bignum2(data, fx);
+     return_closcall1(data, k, bn); ")
+
+ (repl)