From 6d2f271a45759bd792d299f04a424d3382ef4798 Mon Sep 17 00:00:00 2001
From: Keith Packard <keithp@keithp.com>
Date: Sun, 19 Nov 2017 21:07:00 -0800
Subject: altos/lisp: Add floats

Signed-off-by: Keith Packard <keithp@keithp.com>
---
 src/lisp/ao_lisp_const.lisp | 3 ---
 1 file changed, 3 deletions(-)

(limited to 'src/lisp/ao_lisp_const.lisp')

diff --git a/src/lisp/ao_lisp_const.lisp b/src/lisp/ao_lisp_const.lisp
index 861a4fc8..9fb7634c 100644
--- a/src/lisp/ao_lisp_const.lisp
+++ b/src/lisp/ao_lisp_const.lisp
@@ -159,9 +159,6 @@
 (odd? 3)
 (odd? -1)
 
-(define exact? number?)
-(defun inexact? (x) #f)
-
 					; (if <condition> <if-true>)
 					; (if <condition> <if-true> <if-false)
 
-- 
cgit v1.2.3