> ## Demonstrate a bug in perl 5.8 when the first key of a hash ref > ## starts with the letter 'q' unquoted P5Pers: while using -DT to look at what the tokenizer was doing here, I found that it (ie -DT) crashes recent bleedperls. Here's a little patch to stop that. No idea yet about the actual bug report.... PS - I have no idea what a TERMORDORDOR is, apart from the fact that MORDOR is contained within it :-(. -- Standards (n). Battle insignia or tribal totems. --- perl.h- Mon Apr 7 21:29:23 2003 +++ perl.h Mon Apr 7 21:25:20 2003 @@ -3182,6 +3182,7 @@ XATTRTERM, XTERMBLOCK, XTERMORDORDOR /* evil hack */ + /* update exp_name[] in toke.c if adding to this enum */ } expectation; enum { /* pass one of these to get_vtbl */ --- toke.c- Mon Apr 7 21:29:10 2003 +++ toke.c Mon Apr 7 21:24:04 2003 @@ -2141,7 +2141,7 @@ S_find_in_my_stash(pTHX_ char *pkgname, #ifdef DEBUGGING static char* exp_name[] = { "OPERATOR", "TERM", "REF", "STATE", "BLOCK", "ATTRBLOCK", - "ATTRTERM", "TERMBLOCK" + "ATTRTERM", "TERMBLOCK", "TERMORDORDOR" }; #endifThread Previous | Thread Next