From 8ea2cc0071ec48841a9f123dd3209a87220c36c1 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Mon, 5 Nov 2012 08:16:28 +0900 Subject: [PATCH] Removing stray edit. --- vm.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vm.c b/vm.c index 7cf3cd2b..0a33e1d2 100644 --- a/vm.c +++ b/vm.c @@ -1861,7 +1861,7 @@ sexp sexp_apply (sexp ctx, sexp proc, sexp args) { else if (sexp_ratiop(_ARG1)) _ARG1 = sexp_make_flonum(ctx, sexp_ratio_to_double(_ARG1)); #endif - } else if (! sexp_flonump(_ARG1)) + else if (! sexp_flonump(_ARG1)) sexp_raise("exact->inexact: not a number", sexp_list1(ctx, _ARG1)); #endif break;