1# please insert nothing before this line: -*- mode: cperl; cperl-indent-level: 4; cperl-continued-statement-offset: 4; indent-tabs-mode: nil -*-
2# Licensed to the Apache Software Foundation (ASF) under one or more
3# contributor license agreements.  See the NOTICE file distributed with
4# this work for additional information regarding copyright ownership.
5# The ASF licenses this file to You under the Apache License, Version 2.0
6# (the "License"); you may not use this file except in compliance with
7# the License.  You may obtain a copy of the License at
8#
9#     http://www.apache.org/licenses/LICENSE-2.0
10#
11# Unless required by applicable law or agreed to in writing, software
12# distributed under the License is distributed on an "AS IS" BASIS,
13# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14# See the License for the specific language governing permissions and
15# limitations under the License.
16#
17package APR;
18
19use DynaLoader ();
20our $VERSION = '0.009000';
21our @ISA = qw(DynaLoader);
22
23#dlopen("APR.so", RTDL_GLOBAL); so we only need to link libapr.a once
24# XXX: see xs/ModPerl/Const/Const.pm for issues of using 0x01
25use Config ();
26use constant DL_GLOBAL =>
27  ( $Config::Config{dlsrc} eq 'dl_dlopen.xs' && $^O ne 'openbsd' ) ? 0x01 : 0x0;
28sub dl_load_flags { DL_GLOBAL }
29
30unless (defined &APR::XSLoader::BOOTSTRAP) {
31    __PACKAGE__->bootstrap($VERSION);
32    *APR::XSLoader::BOOTSTRAP = sub () { 1 };
33}
34
351;
36__END__
37