diff options
| author | Michele Calgaro <michele.calgaro@yahoo.it> | 2025-03-22 14:06:03 +0900 |
|---|---|---|
| committer | Michele Calgaro <michele.calgaro@yahoo.it> | 2025-03-23 10:40:15 +0900 |
| commit | e7c7a00cc24697ba5ce25a236089608091975f5a (patch) | |
| tree | 85fb5906cd3c781cdb5f26b09920860e49e31bb4 /src/modules/perlcore/ppport.h | |
| parent | a2bd363864dea4771da98b4c6f7ba85ca75a3784 (diff) | |
| download | kvirc-e7c7a00c.tar.gz kvirc-e7c7a00c.zip | |
Replace TRUE/FALSE with boolean values true/false
Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it>
(cherry picked from commit 291b4f5da2f98283b7c98ee90401df7c3cb34dad)
Diffstat (limited to 'src/modules/perlcore/ppport.h')
| -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 611ecf12..8c8a706d 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 |