develooper Front page | perl.perl5.porters | Postings from January 2001

Patch 8359 (perlio) breaks Term::ReadKey

Thread Next
From:
andreas.koenig
Date:
January 8, 2001 05:52
Subject:
Patch 8359 (perlio) breaks Term::ReadKey
Message ID:
m38zom17a3.fsf@ak-71.mind.de
Compilation of TermReadKey succeeds with lots of new warnings but then
it doesn't succeed in GetControlChars. Here the full output of the
build run, followed by my perl -V output:

Writing termio/termios section of cchars.h... Done.
Checking for sgtty...
        Sgtty NOT found.
Writing sgtty section of cchars.h... Done.
/usr/local/perl-5.7.0@8359/bin/perl -I/usr/local/perl-5.7.0@8359/lib/5.7.0/i686-linux -I/usr/local/perl-5.7.0@8359/lib/5.7.0 /usr/local/perl-5.7.0@8359/lib/5.7.0/ExtUtils/xsubpp  -typemap /usr/local/perl-5.7.0@8359/lib/5.7.0/ExtUtils/typemap ReadKey.xs > ReadKey.xsc && mv ReadKey.xsc ReadKey.c
Please specify prototyping behavior for ReadKey.xs (see perlxs manual)
cc -c  -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -DPERL_POLLUTE  -g   -DVERSION=\"2.14\" -DXS_VERSION=\"2.14\" -fpic -I/usr/local/perl-5.7.0@8359/lib/5.7.0/i686-linux/CORE  ReadKey.c
In file included from ReadKey.xs:326:
cchars.h: In function `XS_Term__ReadKey_GetControlChars':
cchars.h:230: warning: assignment from incompatible pointer type
cchars.h:232: warning: assignment from incompatible pointer type
cchars.h: In function `XS_Term__ReadKey_SetControlChars':
cchars.h:352: warning: assignment from incompatible pointer type
cchars.h:354: warning: assignment from incompatible pointer type
ReadKey.xs: In function `selectfile':
ReadKey.xs:1433: warning: passing arg 1 of `PerlIO_get_cnt' from incompatible pointer type
ReadKey.c: In function `XS_Term__ReadKey_SetReadMode':
ReadKey.c:1693: warning: assignment from incompatible pointer type
ReadKey.c: In function `XS_Term__ReadKey_GetTermSizeWin32':
ReadKey.c:1826: warning: assignment from incompatible pointer type
ReadKey.c: In function `XS_Term__ReadKey_GetTermSizeVIO':
ReadKey.c:1863: warning: assignment from incompatible pointer type
ReadKey.c: In function `XS_Term__ReadKey_GetTermSizeGWINSZ':
ReadKey.c:1900: warning: assignment from incompatible pointer type
ReadKey.c: In function `XS_Term__ReadKey_GetTermSizeGSIZE':
ReadKey.c:1937: warning: assignment from incompatible pointer type
ReadKey.c: In function `XS_Term__ReadKey_SetTerminalSize':
ReadKey.c:1979: warning: assignment from incompatible pointer type
ReadKey.c: In function `XS_Term__ReadKey_GetSpeed':
ReadKey.c:2003: warning: assignment from incompatible pointer type
Running Mkbootstrap for Term::ReadKey ()
chmod 644 ReadKey.bs
rm -f blib/arch/auto/Term/ReadKey/ReadKey.so
LD_RUN_PATH="" cc -o blib/arch/auto/Term/ReadKey/ReadKey.so  -shared -L/usr/local/lib ReadKey.o     
chmod 755 blib/arch/auto/Term/ReadKey/ReadKey.so
cp ReadKey.bs blib/arch/auto/Term/ReadKey/ReadKey.bs
chmod 644 blib/arch/auto/Term/ReadKey/ReadKey.bs
Manifying blib/man3/Term::ReadKey.3
  /usr/local/bin/make  -- OK
Running make test
PERL_DL_NONLAZY=1 /usr/local/perl-5.7.0@8359/bin/perl -Iblib/arch -Iblib/lib -I/usr/local/perl-5.7.0@8359/lib/5.7.0/i686-linux -I/usr/local/perl-5.7.0@8359/lib/5.7.0 -w test.pl

And now on to the tests!


Term::ReadKey is using TERMIOS, as opposed to TERMIO or SGTTY.

Non-blocking reads possible via O_NODELAY, and select().
O_NODELAY will be used. select() will be used for timed reads.
Using GetTerminalSize, it appears that your terminal is
80 characters wide by 57 high.

Apparently, you are connected at 38400/38400 baud.

Unable to read terminal settings in GetControlChars at test.pl line 118.



End of Term::ReadKey report, perl -V follows:

Summary of my perl5 (revision 5.0 version 7 subversion 0) configuration:
  Platform:
    osname=linux, osvers=2.4.0-ac3-reiser, archname=i686-linux
    uname='linux ak-75.mind.de 2.4.0-ac3-reiser #1 sun jan 7 12:19:10 cet 2001 i686 unknown '
    config_args='-Dprefix=/usr/local/perl-5.7.0@8359 -Doptimize=-g -des -Duseperlio -Dusedevel'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
  Compiler:
    cc='cc', ccflags ='-DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-g',
    cppflags='-DDEBUGGING -fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='2.95.2 19991024 (release)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, usemymalloc=n, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt -lutil
    perllibs=-lnsl -ldl -lm -lc -lposix -lcrypt -lutil
    libc=/lib/libc-2.2.so, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Compile-time options: DEBUGGING USE_LARGE_FILES
  Locally applied patches:
        DEVEL8341
  Built under linux
  Compiled at Jan  8 2001 14:18:27
  @INC:
    /usr/local/perl-5.7.0@8359/lib/5.7.0/i686-linux
    /usr/local/perl-5.7.0@8359/lib/5.7.0
    /usr/local/perl-5.7.0@8359/lib/site_perl/5.7.0/i686-linux
    /usr/local/perl-5.7.0@8359/lib/site_perl/5.7.0
    /usr/local/perl-5.7.0@8359/lib/site_perl

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About