Skip to content

Instantly share code, notes, and snippets.

@ShimmerFairy
Created October 14, 2012 20:34
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save ShimmerFairy/3889741 to your computer and use it in GitHub Desktop.
ncurses in Perl6
Cannot locate native library '/usr/lib64/libncurses.so'
in method postcircumfix:<( )> at lib/NativeCall.pm6:122
in at src/gen/BOOTSTRAP.pm:827
in any at src/gen/BOOTSTRAP.pm:811
in block at testcurse.p6:14
# test app
use v6;
use NativeCall;
class WINDOW is repr('CPointer') { }
sub initscr() returns WINDOW is native('/usr/lib64/libncurses.so') { * }
sub printw(Str) returns int32 is native('/usr/lib64/libncurses.so') { * }
sub ncrefresh() returns WINDOW is native('/usr/lib64/libncurses.so') is symbol('refresh') { * }
sub getch() returns int32 is native('/usr/lib64/libncurses.so') { * }
sub endwin() returns int32 is native('/usr/lib64/libncurses.so') { * }
initscr();
printw("Hello World!");
ncrefresh();
getch();
endwin();
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment