Author: bernhard
Date: Tue May 29 13:13:54 2007
New Revision: 18677
Modified:
trunk/languages/lisp/lisp.pir
Log:
[languages/lisp]
'-' is allowed in qualified names.
Modified: trunk/languages/lisp/lisp.pir
==============================================================================
--- trunk/languages/lisp/lisp.pir (original)
+++ trunk/languages/lisp/lisp.pir Tue May 29 13:13:54 2007
@@ -49,7 +49,7 @@
.local pmc is_qualified
# todo keyword, split into qualifier, package and symbol
- is_qualified = p6rule(
'(<[abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789]>*)\:(<[abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789%]>*)'
)
+ is_qualified = p6rule(
'(<[abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789]>*)\:(<[abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789%\-]>*)'
)
set_global 'is_qualified', is_qualified
_init_types() # Initialize all the type classes.
