From a97815258a88524a860fbb3aff9be0b7447b926e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20Axel=20S=C3=B8gaard?= <jensaxel@soegaard.net>
Date: Sun, 1 Jul 2012 22:50:43 +0200
Subject: [PATCH] Added note on handling special values in the parser.

---
 bracket/lang/parser.rkt | 6 +++++-
 bracket/lang/reader.rkt | 2 +-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/bracket/lang/parser.rkt b/bracket/lang/parser.rkt
index 0e1eee68f..5cced7629 100644
--- a/bracket/lang/parser.rkt
+++ b/bracket/lang/parser.rkt
@@ -1,7 +1,11 @@
 #lang racket
 (require "parameter.rkt")
 (require syntax/srcloc)
- 
+
+;;;
+;;; TODO: Handle special values.
+;;;       Pasting an image into the REPL breaks the parser at the moment.
+
 ;;;
 ;;; NOTES: 
 ;;;   Changes from planet version:  ]] (CDB) Bug fixed
diff --git a/bracket/lang/reader.rkt b/bracket/lang/reader.rkt
index dc888d62b..3d483a6b3 100644
--- a/bracket/lang/reader.rkt
+++ b/bracket/lang/reader.rkt
@@ -14,7 +14,7 @@
    (bracket-read-syntax #'from-my-read in)))
 
 (define (bracket-read-expression-syntax src in)
-  (if (eof-object? (peek-byte in))
+  (if (eof-object? (peek-byte-or-special in))
       eof
       (with-syntax ([body (parse-expression 
                            src