Code Review
/
kvmfornfv.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
review
|
tree
history
|
raw
|
HEAD
Increasing the cyclictest execution time.
[kvmfornfv.git]
/
qemu
/
scripts
/
shaderinclude.pl
1
#!/usr/bin/perl
2
use strict;
3
use warnings;
4
5
my $file = shift;
6
open FILE, "<", $file or die "open $file: $!";
7
my $name = $file;
8
$name =~ s|.*/||;
9
$name =~ s/[-.]/_/g;
10
print "static GLchar ${name}_src[] =\n";
11
while (<FILE>) {
12
chomp;
13
printf " \"%s\\n\"\n", $_;
14
}
15
print " \"\\n\";\n";
16
close FILE;