diff options
| author |  Szymon Tomasz Stefanek | 2012-12-22 01:53:14 +0000 |
|---|---|---|
| committer | Szymon Tomasz Stefanek | 2012-12-22 01:53:14 +0000 |
| commit | a7572583e8a7f0ed963da2238870170bc3bf12ed (patch) | |
| tree | 3e82d3b87f446fedd7a01924d8d4f281bdf5b140 /src/modules/perlcore | |
| parent | Fixed compilation with qt5rc1 (diff) | |
| download | KVIrc-a7572583e8a7f0ed963da2238870170bc3bf12ed.tar.gz KVIrc-a7572583e8a7f0ed963da2238870170bc3bf12ed.tar.bz2 KVIrc-a7572583e8a7f0ed963da2238870170bc3bf12ed.zip | |
Compile and run with Qt5.0. Also add a couple of KVS functions for byte order conversion.
git-svn-id: https://svn.kvirc.de/svn/trunk/kvirc@6297 17fca916-40b9-46aa-a4ea-0a15b648b75c
Diffstat (limited to 'src/modules/perlcore')
| -rw-r--r-- | src/modules/perlcore/ppport.h | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/modules/perlcore/ppport.h b/src/modules/perlcore/ppport.h index e0f8de2bf..df6e9806f 100644 --- a/src/modules/perlcore/ppport.h +++ b/src/modules/perlcore/ppport.h @@ -192,7 +192,7 @@ __DATA__ #endif /* PERL_REVISION != 5 */ #ifndef ERRSV -# define ERRSV perl_get_sv("@",FALSE) +# define ERRSV perl_get_sv("@",false) #endif #if (PERL_VERSION < 4) || ((PERL_VERSION == 4) && (PERL_SUBVERSION <= 5)) @@ -376,7 +376,7 @@ SV *sv; start_subparse(0), # else /* 5.003_23 onwards */ - start_subparse(FALSE, 0), + start_subparse(false, 0), # endif #endif @@ -426,11 +426,11 @@ SV *sv; #if (PERL_VERSION < 4 || (PERL_VERSION == 4 && PERL_SUBVERSION < 68 )) /* Fetches the SV that keeps the per-interpreter data. */ #define dMY_CXT_SV \ - SV *my_cxt_sv = perl_get_sv(MY_CXT_KEY, FALSE) + SV *my_cxt_sv = perl_get_sv(MY_CXT_KEY, false) #else /* >= perl5.004_68 */ #define dMY_CXT_SV \ SV *my_cxt_sv = *hv_fetch(PL_modglobal, MY_CXT_KEY, \ - sizeof(MY_CXT_KEY)-1, TRUE) + sizeof(MY_CXT_KEY)-1, true) #endif /* < perl5.004_68 */ /* This declaration should be used within all functions that use the |