From 4c08f7099db262557d0846a8a54e0d612b02c0d8 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 28 Mar 2017 21:44:59 +0000 Subject: [PATCH] Added TODO --- scheme/inexact.sld | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/scheme/inexact.sld b/scheme/inexact.sld index 200227e6..1fbf1717 100644 --- a/scheme/inexact.sld +++ b/scheme/inexact.sld @@ -68,7 +68,14 @@ (/ (c-log z1) (c-log z2*))))) (define-c c-log "(void *data, int argc, closure _, object k, object z)" - " return_inexact_double_op(data, k, log, z);") + " return_inexact_double_op(data, k, log, z);" +; TODO: experimenting with how an inline definition might look. +; need something that can both work within the same module and +; also when imported into another module. +; inline: +; "(void *data, object ptr, object z)" +; " return_inexact_double_op(data, k, log, z);" + ) (define-c sin "(void *data, int argc, closure _, object k, object z)" " return_inexact_double_op(data, k, sin, z);")