Mercurial > repo
view perl-5.22.2/regen/miniperlmain.pl @ 8045:a16537d2fe07
<xfix> tar xf perl-5.22.2.tar.gz # Ah, whatever, I\'m doing it anyway
author | HackBot |
---|---|
date | Sat, 14 May 2016 14:54:38 +0000 |
parents | |
children |
line wrap: on
line source
#!/usr/bin/perl use strict; BEGIN { # Get function prototypes require 'regen/regen_lib.pl'; unshift @INC, 'ext/ExtUtils-Miniperl/lib'; } use ExtUtils::Miniperl 1; my $fh = open_new('miniperlmain.c', undef, {by => "$0 and ExtUtils::Miniperl"}); writemain($fh); read_only_bottom_close_and_rename($fh);