[Wisp-cvs] wisp/doc paw.txt,1.9,1.10 wisp.vim,1.218,1.219

[<di...@us...>]

Update of /cvsroot/wisp/wisp/doc
In directory usw-pr-cvs1:/tmp/cvs-serv30995/doc

Modified Files:
	paw.txt wisp.vim 
Log Message:
Borrowed the box external representation from PLT MzScheme.

Index: paw.txt
===================================================================
RCS file: /cvsroot/wisp/wisp/doc/paw.txt,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- paw.txt	26 Aug 2002 14:02:42 -0000	1.9
+++ paw.txt	4 Sep 2002 14:33:22 -0000	1.10
@@ -211,6 +211,9 @@
   (It is worth noting that such whitespace is very rarely used in the
   Lisp programming style.)
 
+  There should be a special exception for boxes since ampersand is
+  a legitimate object starter character.
+
 
 13. Explicitly declared global variables <inc>
   PAW-13 proposes to implement global variables with explicit

Index: wisp.vim
===================================================================
RCS file: /cvsroot/wisp/wisp/doc/wisp.vim,v
retrieving revision 1.218
retrieving revision 1.219
diff -u -d -r1.218 -r1.219
--- wisp.vim	4 Sep 2002 14:32:19 -0000	1.218
+++ wisp.vim	4 Sep 2002 14:33:22 -0000	1.219
@@ -29,7 +29,7 @@
 syn match wispRootError oneline "[])]"
 syn keyword wispRootError .
 
-syn cluster wispRoot contains=wispQuoted,wispUnquoted,wispQuoteError,wispStruc,wispStrucTag,wispScope,wispSet,wispString,@wispLiteral,@wispLowlitWords,wispComment,wispNestedComment,wispRootError
+syn cluster wispRoot contains=wispQuoted,wispUnquoted,wispQuoteError,wispStruc,wispStrucTag,wispScope,wispSet,wispString,@wispLiteral,@wispLowlitWords,wispComment,wispNestedComment,wispRootError,wispBox
 syn cluster wispTop contains=@wispRoot,@wispHilitWords
 syn cluster wispLiteral contains=wispChar,wispBoolean,wispNumber
 syn cluster wispWords contains=@wispHilitWords,@wispLowlitWords
@@ -50,6 +50,8 @@
 syn match wispSet "\~"
 syn match wispScope "|"
 
+syn match wispBox "#&\.\?"
+
 " Quoted and quasiquoted stuff
 
 syn region wispQuoted matchgroup=Delimiter start="['`]\+" end=![ \t()\[\]|";~]!me=e-1 contains=@wispRoot
@@ -381,6 +383,7 @@
   hi link wispKeyword       Delimiter
   hi link wispDot           Delimiter
 
+  hi link wispBox           Delimiter
   hi link wispRef           PreProc
   hi link wispStrucTag      PreProc
   hi link wispScope         PreProc