# New Ticket Created by
# Please include the string: [perl #124317]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=124317 >
OS: Ubuntu 14.10 LTS under VirtualBox
Host OS: Windows 8, Intel Core I5
Rakudo version: current as of 16/4/2015
The compiler complains of the following error:
--cut here--
Calling rl_get_screen_size(Pointer, Pointer) will never work with
declared signature (Pointer, Pointer)
at /home/jgoff/Documents/perl6-readline/lib/ReadLine.pm6:1153
------> ⏏rl_get_screen_size( $r, $c ) }
from examples/perl6-echo.p6:3
--cut here--
On the following code:
--cut here--
sub rl_get_screen_size( Pointer[Int], Pointer[Int] )
is native( LIB ) { * }
method rl-get-screen-size( Pointer[Int] $r, Pointer[Int] $c ) {
rl_get_screen_size( $r, $c ) }
--cut here--
The problem seems to be directly related to the parametrization of the
Pointer type, signatures of the type 'rl_set_screen_size( Int, Int )'
aren't affected by this bug. Incidentally I'm aware that I could use "is
symbol('rl_get_screen_size')" but I've already had occasion to write
Perl6 code whose signature differs from the native code, so I'd rather
keep the flexibility around.
