| CARVIEW |
Select Language
HTTP/2 302
server: nginx
date: Thu, 31 Jul 2025 07:51:09 GMT
content-type: text/plain; charset=utf-8
content-length: 0
x-archive-redirect-reason: found capture at 20210117091704
location: https://web.archive.org/web/20210117091704/https://perl5.git.perl.org/perl5.git/blob/HEAD:/INTERN.h
server-timing: captures_list;dur=0.678072, exclusion.robots;dur=0.031369, exclusion.robots.policy;dur=0.013568, esindex;dur=0.014579, cdx.remote;dur=14.671961, LoadShardBlock;dur=804.858079, PetaboxLoader3.datanode;dur=621.545346, PetaboxLoader3.resolve;dur=173.597511
x-app-server: wwwb-app203
x-ts: 302
x-tr: 850
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0
set-cookie: SERVER=wwwb-app203; path=/
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
HTTP/2 200
server: nginx
date: Thu, 31 Jul 2025 07:51:10 GMT
content-type: application/xhtml+xml; charset=utf-8
x-archive-orig-date: Sun, 17 Jan 2021 09:17:04 GMT
x-archive-orig-server: Apache/2.4.6 (CentOS) OpenSSL/1.0.2k-fips
x-archive-orig-keep-alive: timeout=5, max=100
x-archive-orig-connection: Keep-Alive
x-archive-orig-x-crawler-transfer-encoding: chunked
x-archive-orig-content-length: 11912
x-archive-guessed-content-type: text/html
x-archive-guessed-charset: utf-8
memento-datetime: Sun, 17 Jan 2021 09:17:04 GMT
link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Sun, 17 Jan 2021 09:17:04 GMT", ; rel="memento"; datetime="Sun, 17 Jan 2021 09:17:04 GMT", ; rel="last memento"; datetime="Sun, 17 Jan 2021 09:17:04 GMT"
content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org
x-archive-src: CC-MAIN-2021-04-1610703511903.11-0009/CC-MAIN-20210117081748-20210117111748-00184.warc.gz
server-timing: captures_list;dur=0.514215, exclusion.robots;dur=0.019040, exclusion.robots.policy;dur=0.008406, esindex;dur=0.010366, cdx.remote;dur=50.519444, LoadShardBlock;dur=474.538514, PetaboxLoader3.resolve;dur=308.030436, PetaboxLoader3.datanode;dur=322.275147, load_resource;dur=324.534554
x-app-server: wwwb-app203
x-ts: 200
x-tr: 909
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
perl5.git.perl.org Git - perl5.git/blob - INTERN.h
1 /* INTERN.h
2 *
3 * Copyright (C) 1991, 1992, 1993, 1995, 1996, 1998, 2000, 2001,
4 * by Larry Wall and others
5 *
6 * You may distribute under the terms of either the GNU General Public
7 * License or the Artistic License, as specified in the README file.
8 *
9 */
11 /*
12 * EXT designates a global var which is defined in perl.h
13 * dEXT designates a global var which is defined in another
14 * file, so we can't count on finding it in perl.h
15 * (this practice should be avoided).
16 */
17 #undef EXT
18 #undef dEXT
19 #undef EXTCONST
20 #undef dEXTCONST
22 # if (defined(WIN32) && defined(__MINGW32__) && ! defined(PERL_IS_MINIPERL))
23 # ifdef __cplusplus
24 # define EXT __declspec(dllexport)
25 # define dEXT
26 # define EXTCONST __declspec(dllexport) extern const
27 # define dEXTCONST const
28 # else
29 # define EXT __declspec(dllexport)
30 # define dEXT
31 # define EXTCONST __declspec(dllexport) const
32 # define dEXTCONST const
33 # endif
34 # else
35 # ifdef __cplusplus
36 # define EXT
37 # define dEXT
38 # define EXTCONST EXTERN_C const
39 # define dEXTCONST const
40 # else
41 # define EXT
42 # define dEXT
43 # define EXTCONST const
44 # define dEXTCONST const
45 # endif
46 # endif
48 #undef INIT
49 #define INIT(x) = x
51 #define DOINIT