Byte strings are legal literals in match constants.

svn: r8543
2008-02-05 17:48:10 +00:00 · 2008-02-05 17:48:10 +00:00 · 5d17cf0417
commit 5d17cf0417
parent 6fa6ea3bb3
1 changed files with 2 additions and 1 deletions
--- a/collects/mzlib/private/match/match-helper.ss
+++ b/collects/mzlib/private/match/match-helper.ss
@ -29,7 +29,8 @@
     (boolean? v)
     (char? v)
     (number? v)
-     (keyword? v)))
+     (keyword? v)
+     (bytes? v)))
  
  
  ;;!(function symbol-append