From e979130b660eed63a21f73fea2580e936b468e48 Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Thu, 10 Jun 2010 23:39:19 +0200
Subject: [PATCH] remove annotation?

* module/ice-9/boot-9.scm (annotation?): Remove unused new definition.
---
 module/ice-9/boot-9.scm | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index 85b44b14f..0a02a98ca 100644
--- a/module/ice-9/boot-9.scm
+++ b/module/ice-9/boot-9.scm
@@ -337,11 +337,6 @@ If there is no handler at all, Guile prints an error and then exits."
 (define (resolve-module . args)
   #f)
 
-;; Input hook to syncase -- so that we might be able to pass annotated
-;; expressions in. Currently disabled. Maybe we should just use
-;; source-properties directly.
-(define (annotation? x) #f)
-
 ;; API provided by psyntax
 (define syntax-violation #f)
 (define datum->syntax #f)