This distribution has been tested as part of the cpan-testers
effort to test as many new uploads to CPAN as possible.  See
http://testers.cpan.org/

Please cc any replies to [email protected] to keep other
test volunteers informed and to prevent any duplicate effort.

--
# here is my patch. I hope that this is helpful for you. :-)

diff -uNr Syntax-Highlight-Universal-0.4/colorer/common/Hashtable.h 
Syntax-Highlight-Universal-0.4.new/colorer/common/Hashtable.h
--- Syntax-Highlight-Universal-0.4/colorer/common/Hashtable.h   2004-09-30 
00:18:40.000000000 +0900
+++ Syntax-Highlight-Universal-0.4.new/colorer/common/Hashtable.h       
2007-08-20 20:37:54.000000000 +0900
@@ -19,8 +19,8 @@
 
   T get(const String *key) const{
     int hash = key->hashCode();
-    int bno = (hash&0x7FFFFFFF) % capacity;
-    for(HashEntry<T> *he = bucket[bno]; he != null; he = he->next)
+    int bno = (hash&0x7FFFFFFF) % this->capacity;
+    for(HashEntry<T> *he = this->bucket[bno]; he != null; he = he->next)
       if (he->hash == hash && *he->key == *key)
         return he->value;
     return null;
@@ -30,7 +30,7 @@
       Returns first element value in a sequence, or null, if hashtable is 
empty.
   */
   T enumerate() const{
-    T * retval = enumerate_int();
+    T * retval = this->enumerate_int();
     if (retval == null) return null;
     return *retval;
   };
@@ -39,7 +39,7 @@
       is thrown. If end of hash is reached, exception is thrown.
   */
   T next() const{
-    T *retval = next_int();
+    T *retval = this->next_int();
     if (retval == null) return null;
     return *retval;
   };
@@ -61,8 +61,8 @@
 
   const T *get(const String *key) const{
     int hash = key->hashCode();
-    int bno = (hash&0x7FFFFFFF) % capacity;
-    for(HashEntry<T> *he = bucket[bno]; he != null; he = he->next)
+    int bno = (hash&0x7FFFFFFF) % this->capacity;
+    for(HashEntry<T> *he = this->bucket[bno]; he != null; he = he->next)
       if (he->hash == hash && *he->key == *key)
         return &he->value;
     return null;
@@ -72,14 +72,14 @@
       Returns first element value in a sequence, or null, if hashtable is empty
   */
   T *enumerate() const{
-    return enumerate_int();
+    return this->enumerate_int();
   };
   /** Returns the next value object with current enumeration procedure.
       If hashtable state is changed, and next() call occurs, exception
       is thrown. If end of hash is reached, exception is thrown.
   */
   T *next() const{
-    return next_int();
+    return this->next_int();
   };
 };
 
--

Summary of my perl5 (revision 5 version 8 subversion 8) configuration:
  Platform:
    osname=linux, osvers=2.6.20-arch, archname=i686-linux-thread-multi
    uname='linux wohnung 2.6.20-arch #1 smp preempt sat mar 10 10:12:25 cet 
2007 i686 amd athlon(tm) xp 2200+ authenticamd gnulinux '
    config_args='-des -Dprefix=/usr -Dinstallprefix=/usr 
-Dman1dir=/usr/man/man1 -Dman3dir=/usr/man/man3 -Doptimize=-march=i686 -O2 
-pipe -Dusethreads'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=define use5005threads=undef useithreads=define 
usemultiplicity=define
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS 
-fno-strict-aliasing -pipe -Wdeclaration-after-statement -I/usr/local/include 
-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-march=i686 -O2 -pipe',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS 
-fno-strict-aliasing -pipe -Wdeclaration-after-statement -I/usr/local/include'
    ccversion='', gccversion='4.1.2', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', 
lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lpthread -lc
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    libc=/lib/libc-2.5.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.5'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'

Reply via email to