From 80e885a9847c9bce1be8cccafc85ea39cbc120e2 Mon Sep 17 00:00:00 2001 From: Teddy Date: Fri, 9 Aug 2013 23:50:42 +0800 Subject: numerical overflow detection --- eval.cpp | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'eval.cpp') diff --git a/eval.cpp b/eval.cpp index 323c4c9..369a150 100644 --- a/eval.cpp +++ b/eval.cpp @@ -35,6 +35,10 @@ void Evaluator::add_builtin_routines() { ADD_BUILTIN_PROC("exact?", num_is_exact); ADD_BUILTIN_PROC("inexact?", num_is_inexact); ADD_BUILTIN_PROC("number?", is_number); + ADD_BUILTIN_PROC("complex?", is_complex); + ADD_BUILTIN_PROC("real?", is_real); + ADD_BUILTIN_PROC("rational?", is_rational); + ADD_BUILTIN_PROC("integer?", is_integer); ADD_BUILTIN_PROC("not", bool_not); ADD_BUILTIN_PROC("boolean?", is_boolean); -- cgit v1.2.3