File: 90stack.t

package info (click to toggle)
libxml-libxml-perl 2.0116%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie-kfreebsd
  • size: 2,420 kB
  • sloc: perl: 6,139; ansic: 3,752; xml: 182; sh: 64; makefile: 8
file content (19 lines) | stat: -rw-r--r-- 404 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
# -*- cperl -*-

##
# This test checks that the XS code handles the perl stack correctly
# when the module loads.  This failed in 5.19.6+.
#
# See: https://rt.cpan.org/Ticket/Display.html?id=92606 .

use Test::More tests => 1;

for (1) {
    for (1,0) {
        require XML::LibXML;
    }
}

# If we get this far, then all is fine.
# TEST
pass("Loading XML::LibXML works inside multiple foreach loops");