Consistent external forms.

git-svn-id: http://svn.drobilla.net/resp/tuplr@76 ad02d1e2-f140-0410-9f75-f8b11f17cedd

1 files changed, 2 insertions, 2 deletions

diff --git a/llvm.cpp b/llvm.cpp
index 3ccb1d7..ecfb735 100644
--- a/llvm.cpp
+++ b/llvm.cpp
@@ -493,9 +493,9 @@ call(AType* retT, void* fp)
 	if (lltype(retT) == Type::Int32Ty)
 		ss << ((int32_t (*)())fp)();
 	else if (lltype(retT) == Type::FloatTy)
-		ss << ((float (*)())fp)();
+		ss << showpoint << ((float (*)())fp)();
 	else if (lltype(retT) == Type::Int1Ty)
-		ss << ((bool (*)())fp)();
+		ss << (((bool (*)())fp)() ? "#t" : "#f");
 	else
 		ss << ((void* (*)())fp)();
 	return ss.str();