[crypticl-cvs] CVS crypticl/src

[tskogan]

Update of /project/crypticl/cvsroot/crypticl/src
In directory clnet:/tmp/cvs-serv25483

Modified Files:
	common.lisp 
Log Message:
Comment on the implementation dependent nature of byte-code.


--- /project/crypticl/cvsroot/crypticl/src/common.lisp	2007/01/06 12:42:11	1.5
+++ /project/crypticl/cvsroot/crypticl/src/common.lisp	2007/01/16 23:44:32	1.6
@@ -131,6 +131,7 @@
 	(end (length string)))
     (flet ((string-reader ()
 	     (if (< i end)
+		 ;;XXX Can return more than a 8 bit value with Unicode strings
 		 (prog1 (char-code (aref string i)) ;return this
 		   (incf i))		;Can't use 1+
 	       nil)))