diff options
| -rw-r--r-- | perl-install/c/stuff.xs.pm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm index 5968289ac..ecffd9c10 100644 --- a/perl-install/c/stuff.xs.pm +++ b/perl-install/c/stuff.xs.pm @@ -57,6 +57,10 @@ FD_t fd2FD_t(int fd) { return f; } +'; + +print ' + void initIMPS2() { unsigned char imps2_s1[] = { 243, 200, 243, 100, 243, 80, }; unsigned char imps2_s2[] = { 246, 230, 244, 243, 100, 232, 3, }; @@ -72,11 +76,6 @@ void initIMPS2() { tcdrain(fd); } - -'; - -print ' - long long llseek(int fd, long long offset, int whence); MODULE = c::stuff PACKAGE = c::stuff |