debian/0000755000000000000000000000000011773075053007176 5ustar debian/rules0000755000000000000000000000063211773074335010261 0ustar #!/usr/bin/make -f %: dh $@ override_dh_auto_build: $(MAKE) COPT_DEFAULT="" \ Y_CFLAGS="$(CFLAGS) $(CPPFLAGS)" \ Y_LDFLAGS="$(LDFLAGS)" \ PKG_DEPLIBS=-lncurses override_dh_auto_install-arch: dh_installyorick override_dh_auto_clean: $(MAKE) Y_MAKEDIR=/usr/lib/yorick Y_EXE=/usr/bin/yorick clean rm -f *.o override_dh_auto_test: # the test suite requires manual intervention debian/changelog0000644000000000000000000000313711773074562011060 0ustar yorick-curses (0.1-6) unstable; urgency=low * Fortify (don't rely on yorick to provide right flags) * Minimize debian/rules using dh notation * Use (fix_64bit_safeness) patch to configure -- Thibaut Paumard Thu, 28 Jun 2012 17:34:10 +0200 yorick-curses (0.1-5) unstable; urgency=low * Amend control to comply with the Debian Science Policy * Check against policy 3.9.3 -- Thibaut Paumard Tue, 26 Jun 2012 17:53:37 +0200 yorick-curses (0.1-4) unstable; urgency=low * round() -> long(round()) * change section to science * bump policy to 3.8.4 * add missing dependency to yutils (round function) * convert to "3.0 (quilt)" format -- Thibaut Paumard Wed, 07 Apr 2010 12:49:14 +0200 yorick-curses (0.1-3) unstable; urgency=high * fixed bug "yorick-curses is not 64bit-safe" (Closes: #506334). -- Thibaut Paumard Thu, 20 Nov 2008 18:54:53 +0100 yorick-curses (0.1-2) unstable; urgency=low * debian/watch: file added * debian/rules: converted to dh_installyorick * added debian/ynstall * added debian/yorick-curses.packinfo * debian/control: * DM-Upload-Allowed field added * upgraded to Standards-Version: 3.7.3.0 * upgrade build dependency on yorick (>= 2.1.05+dfsg-2~bpo40+1) -- Thibaut Paumard Mon, 14 Jan 2008 16:19:53 +0100 yorick-curses (0.1-1) unstable; urgency=low * Initial Release. Closes: #366714 -- Thibaut Paumard Sun, 30 Apr 2006 19:48:00 +0200 debian/watch0000644000000000000000000000011111772354572010225 0ustar version=3 http://www.maumae.net/yorick/packages/src/curses-(.*)-src\.tgz debian/docs0000644000000000000000000000000711772354571010052 0ustar README debian/control0000644000000000000000000000164411773073470010607 0ustar Source: yorick-curses Section: science Priority: extra Maintainer: Debian Science Maintainers Uploaders: Thibaut Paumard Build-Depends: debhelper (>= 9), yorick-dev (>= 2.1.05+dfsg-2~bpo40+1), libncurses-dev Standards-Version: 3.9.3 DM-Upload-Allowed: yes Vcs-Git: git://git.debian.org/git/debian-science/packages/yorick-curses.git Vcs-Browser: http://git.debian.org/?p=debian-science/packages/yorick-curses.git Package: yorick-curses Architecture: any Depends: yorick (>= 1.6.02), yorick-yutils, ${shlibs:Depends}, ${misc:Depends} Description: interface to the (n)curses library for the Yorick language Yorick-curses enables programs written in Yorick (an interpreted computer language specialized for numerical and scientific problems) to use the (n)curses library, which allows fine control of the cursor and output in a terminal session. debian/yorick-curses.packinfo0000644000000000000000000000031611772354572013521 0ustar :newsubsection curses: interface to the (n)curses library :curses enables programs written in Yorick to use the (n)curses library, which allows fine control of the cursor and output in a terminal session debian/compat0000644000000000000000000000000211773073461010375 0ustar 9 debian/copyright0000644000000000000000000000213011772354571011131 0ustar This package was debianized by Thibaut Paumard on Sun, 30 Apr 2006 19:48:00 +0200. It was downloaded from http://www.maumae.net/yorick/packages/src/curses-0.1-src.tgz Author: François Rigaut * Copyright (c) 2003, Francois RIGAUT (frigaut@maumae.net) * * This program is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License as published by the * Free Software Foundation; either version 2 of the License, or (at your * option) any later version. * * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details (to receive a copy of the GNU * General Public License, write to the Free Software Foundation, Inc., 51 * Franklin St, Fifth Floor, Boston, MA 02110-1301, USA). On Debian systems, the complete text of the GNU General Public License can be found in `/usr/share/common-licenses/GPL'. debian/README.Debian0000644000000000000000000000067311772354571011251 0ustar Yorick (n)curses plugin for Debian ---------------------------------- This is the `curses' plugin by François Rigaut for the Yorick interpreted language, prepackaged for Debian GNU/Linux. A sample/test file is provided in /usr/share/doc/yorick-curses/examples/. You can run it with "yorick -batch check.i". The yorick-yutils package is necessary for this. Thibaut Paumard , Fri, 01 Sep 2006 09:51:44 +0200 debian/source/0000755000000000000000000000000011772354575010506 5ustar debian/source/format0000644000000000000000000000001411772354575011714 0ustar 3.0 (quilt) debian/patches/0000755000000000000000000000000011773074166010631 5ustar debian/patches/long_round0000644000000000000000000000170711772354575012733 0ustar Author Thibaut Paumard Forwarded: yes Last-Update: 2010-03-07 Description: not all round() implementations return a long --- a/curses.i +++ b/curses.i @@ -17,6 +17,8 @@ * Mass Ave, Cambridge, MA 02139, USA). */ +#include "utils.i" + func curses{} /* DOCUMENT curses package The curses plugin wraps some of the curses routine, hopefully enough @@ -236,7 +238,7 @@ cerase; tic; while ((elapsed=tac()) < sec) { - el = round(elapsed); + el = long(round(elapsed)); cmvprintw,0,0,"[%-"+swrite(format="%s",sec)+"s]",((el==0)?"":array("*",el)(sum)); cmvprintw,0,sec+3,"Time remaining: %s sec",swrite(format="%.3f",sec-elapsed); cclrtobot; @@ -257,7 +259,7 @@ if (line==[]) line=0; nc = cgetcols(); - el = round(current*1./outof*nstars); + el = long(round(current*1./outof*nstars)); cmvprintw,line,nc-nstars-2,"[%-"+swrite(format="%d",nstars)+"s]", ((el==0)?"":array("*",el)(sum)); debian/patches/series0000644000000000000000000000003611773074124012037 0ustar fix_64bit_safeness long_round debian/patches/fix_64bit_safeness0000644000000000000000000003100711772354575014246 0ustar Author: Thibaut Paumard Bug-Debian: http://bugs.debian.org/506334 Forwarded: yes Last-Update: 2010-03-07 Description: use the actual curses.h file rather than second-guessing it --- yorick-curses-0.1.orig/Makefile +++ yorick-curses-0.1/Makefile @@ -1,8 +1,8 @@ -Y_MAKEDIR=/Users/frigaut/yorick-2.1/Darwin-Power_Macintosh -Y_EXE=/Users/frigaut/yorick-2.1/Darwin-Power_Macintosh/bin/yorick +Y_MAKEDIR=/usr/lib/yorick +Y_EXE=/usr/lib/yorick/bin/yorick Y_EXE_PKGS= -Y_EXE_HOME=/Users/frigaut/yorick-2.1/Darwin-Power_Macintosh -Y_EXE_SITE=/Users/frigaut/yorick-2.1 +Y_EXE_HOME=/usr/lib/yorick +Y_EXE_SITE=/usr/lib/yorick # ----------------------------------------------------- optimization flags @@ -14,7 +14,7 @@ TGT=$(DEFAULT_TGT) PKG_NAME=curses PKG_I=curses.i -OBJS=curses.o +OBJS=curses.o ywrap_static.o # change to give the executable a name other than yorick PKG_EXENAME=yorick --- yorick-curses-0.1.orig/curses.i +++ yorick-curses-0.1/curses.i @@ -47,179 +47,179 @@ if (strmatch(get_env("TERM"),"emacs")) \ plug_in, "curses"; extern kbdinit; -/* PROTOTYPE +/* xPROTOTYPE void kbdinit(void) */ extern kbd; -/* PROTOTYPE +/* xPROTOTYPE int kbd(int wait) */ extern kbdend; -/* PROTOTYPE +/* xPROTOTYPE void kbdend(void) */ extern cgetch; -/* PROTOTYPE +/* xPROTOTYPE int getch(void) */ extern cinitscr; -/* PROTOTYPE - int initscr(void) +/* xPROTOTYPE + long initscr(void) */ extern cendwin; -/* PROTOTYPE +/* xPROTOTYPE int endwin(void) */ extern cisendwin; -/* PROTOTYPE +/* xPROTOTYPE int isendwin(void) */ extern ccbreak; -/* PROTOTYPE +/* xPROTOTYPE int cbreak(void) */ extern cnocbreak; -/* PROTOTYPE +/* xPROTOTYPE int nocbreak(void) */ extern chalfdelay; -/* PROTOTYPE +/* xPROTOTYPE int halfdelay(int tenths) */ extern craw; -/* PROTOTYPE +/* xPROTOTYPE int raw(void) */ extern cnoraw; -/* PROTOTYPE +/* xPROTOTYPE int noraw(void) */ extern ctimeout; -/* PROTOTYPE +/* xPROTOTYPE void timeout(int delay) */ extern cnl; -/* PROTOTYPE +/* xPROTOTYPE int nl(void) */ extern cnonl; -/* PROTOTYPE +/* xPROTOTYPE int nonl(void) */ extern cprintw; -/* PROTOTYPE +/* xPROTOTYPE int printw(string fmt, string str) */ extern cmvprintw; -/* PROTOTYPE +/* xPROTOTYPE int mvprintw(int y, int x, string fmt, string str) */ extern crefresh; -/* PROTOTYPE +/* xPROTOTYPE int refresh(void) */ extern caddch; -/* PROTOTYPE +/* xPROTOTYPE int addch(char ch) */ extern cmvaddch; -/* PROTOTYPE +/* xPROTOTYPE int mvaddch(int y, int x, char ch) */ extern cerase; -/* PROTOTYPE +/* xPROTOTYPE int erase(void) */ extern cclear; -/* PROTOTYPE +/* xPROTOTYPE int clear(void) */ extern cclrtobot; -/* PROTOTYPE +/* xPROTOTYPE int clrtobot(void) */ extern cclrtoeol; -/* PROTOTYPE +/* xPROTOTYPE int clrtoeol(void) */ extern cbkgdset; -/* PROTOTYPE - int bkgdset(char ch) +/* xPROTOTYPE + void bkgdset(char ch) */ extern cgetlines; -/* PROTOTYPE +/* xPROTOTYPE int getlines(void) */ extern cgetcols; -/* PROTOTYPE +/* xPROTOTYPE int getcols(void) */ extern ccurs_set; -/* PROTOTYPE +/* xPROTOTYPE int curs_set(int visibility) */ extern ccurs_move; -/* PROTOTYPE +/* xPROTOTYPE int move(int y, int x) */ extern cbeep; -/* PROTOTYPE +/* xPROTOTYPE int beep(void) */ extern cflash; -/* PROTOTYPE +/* xPROTOTYPE int flash(void) */ extern cecho; -/* PROTOTYPE +/* xPROTOTYPE int echo(void) */ extern cnoecho; -/* PROTOTYPE +/* xPROTOTYPE int noecho(void) */ extern cgetstr; -/* PROTOTYPE +/* xPROTOTYPE int getstr(string str); */ extern cmvgetstr; -/* PROTOTYPE +/* xPROTOTYPE int mvgetstr(int y, int x, string str); */ extern cnodelay; -/* PROTOTYPE +/* xPROTOTYPE int ynodelay(int condition) */ extern cnotimeout; -/* PROTOTYPE +/* xPROTOTYPE int ynotimeout(int condition) */ extern ckeypad; -/* PROTOTYPE +/* xPROTOTYPE int ykeypad(int condition) */ extern cmeta; -/* PROTOTYPE +/* xPROTOTYPE int ymeta(int condition) */ extern cintrflush; -/* PROTOTYPE +/* xPROTOTYPE int yintrflush(int condition) */ extern cscrollok; -/* PROTOTYPE +/* xPROTOTYPE int yscrollok(int condition) */ extern cleaveok; -/* PROTOTYPE +/* xPROTOTYPE int yleaveok(int condition) */ extern cclearok; -/* PROTOTYPE +/* xPROTOTYPE int yclearok(int condition) */ extern cidlok; -/* PROTOTYPE +/* xPROTOTYPE int yidlok(int condition) */ --- /dev/null +++ yorick-curses-0.1/ywrap_static.c @@ -0,0 +1,449 @@ +/* codger-generated yorick package wrapper file */ +#include "play.h" +#include "ydata.h" +#include + +/*----------------begin curses.i */ +//extern BuiltIn Y_kbdinit; + +//extern void kbdinit(void ); +void +Y_kbdinit(int n) +{ + if (n!=0) YError("kbdinit takes exactly 0 arguments"); + kbdinit(); +} + +//extern BuiltIn Y_kbd; + +//extern int kbd(int ); +void +Y_kbd(int n) +{ + if (n!=1) YError("kbd takes exactly 1 arguments"); + PushIntValue(kbd(yarg_si(0))); +} + +//extern BuiltIn Y_kbdend; + +//extern void kbdend(void ); +void +Y_kbdend(int n) +{ + if (n!=0) YError("kbdend takes exactly 0 arguments"); + kbdend(); +} + +//extern BuiltIn Y_cgetch; + +//extern int getch(void ); +void +Y_cgetch(int n) +{ + if (n>1) YError("cgetch takes void argument"); + PushIntValue(getch()); +} + +//extern BuiltIn Y_cinitscr; + +//extern long initscr(void ); +void +Y_cinitscr(int n) +{ + if (n>1) YError("cinitscr takes void argument"); + PushLongValue((long)initscr()); +} + +//extern BuiltIn Y_cendwin; + +//extern int endwin(void ); +void +Y_cendwin(int n) +{ + if (n>1) YError("cendwin takes void argument"); + PushIntValue(endwin()); +} + +//extern BuiltIn Y_cisendwin; + +//extern int isendwin(void ); +void +Y_cisendwin(int n) +{ + if (n>1) YError("cisendwin takes void argument"); + PushIntValue(isendwin()); +} + +//extern BuiltIn Y_ccbreak; + +//extern int cbreak(void ); +void +Y_ccbreak(int n) +{ + if (n>1) YError("ccbreak takes void argument"); + PushIntValue(cbreak()); +} + +//extern BuiltIn Y_cnocbreak; + +//extern int nocbreak(void ); +void +Y_cnocbreak(int n) +{ + if (n>1) YError("cnocbreak takes void argument"); + PushIntValue(nocbreak()); +} + +//extern BuiltIn Y_chalfdelay; + +//extern int halfdelay(int ); +void +Y_chalfdelay(int n) +{ + if (n!=1) YError("chalfdelay takes exactly 1 arguments"); + PushIntValue(halfdelay(yarg_si(0))); +} + +//extern BuiltIn Y_craw; + +//extern int raw(void ); +void +Y_craw(int n) +{ + if (n>1) YError("craw takes void argument"); + PushIntValue(raw()); +} + +//extern BuiltIn Y_cnoraw; + +//extern int noraw(void ); +void +Y_cnoraw(int n) +{ + if (n>1) YError("cnoraw takes void argument"); + PushIntValue(noraw()); +} + +//extern BuiltIn Y_ctimeout; + +//extern void timeout(int ); +void +Y_ctimeout(int n) +{ + if (n!=1) YError("ctimeout takes exactly 1 arguments"); + timeout(yarg_si(0)); +} + +//extern BuiltIn Y_cnl; + +//extern int nl(void ); +void +Y_cnl(int n) +{ + if (n>1) YError("cnl takes void argument"); + PushIntValue(nl()); +} + +//extern BuiltIn Y_cnonl; + +//extern int nonl(void ); +void +Y_cnonl(int n) +{ + if (n>1) YError("cnonl takes void argument"); + PushIntValue(nonl()); +} + +//extern BuiltIn Y_cprintw; + +//extern int printw(char *, char *); +void +Y_cprintw(int n) +{ + if (n!=2) YError("cprintw takes exactly 2 arguments"); + PushIntValue(printw(yarg_sq(1), yarg_sq(0))); +} + +//extern BuiltIn Y_cmvprintw; + +//extern int mvprintw(int , int , char *, char *); +void +Y_cmvprintw(int n) +{ + if (n!=4) YError("cmvprintw takes exactly 4 arguments"); + PushIntValue(mvprintw(yarg_si(3), yarg_si(2), yarg_sq(1), + yarg_sq(0))); +} + +//extern BuiltIn Y_crefresh; + +//extern int refresh(void ); +void +Y_crefresh(int n) +{ + if (n>1) YError("crefresh takes void argument"); + PushIntValue(refresh()); +} + +//extern BuiltIn Y_caddch; + +//extern int addch(char ); +void +Y_caddch(int n) +{ + if (n!=1) YError("caddch takes exactly 1 arguments"); + PushIntValue(addch(yarg_sc(0))); +} + +//extern BuiltIn Y_cmvaddch; + +//extern int mvaddch(int , int , char ); +void +Y_cmvaddch(int n) +{ + if (n!=3) YError("cmvaddch takes exactly 3 arguments"); + PushIntValue(mvaddch(yarg_si(2), yarg_si(1), yarg_sc(0))); +} + +//extern BuiltIn Y_cerase; + +//extern int erase(void ); +void +Y_cerase(int n) +{ + if (n>1) YError("cerase takes void argument"); + PushIntValue(erase()); +} + +//extern BuiltIn Y_cclear; + +//extern int clear(void ); +void +Y_cclear(int n) +{ + if (n>1) YError("cclear takes void argument"); + PushIntValue(clear()); +} + +//extern BuiltIn Y_cclrtobot; + +//extern int clrtobot(void ); +void +Y_cclrtobot(int n) +{ + if (n>1) YError("cclrtobot takes void argument"); + PushIntValue(clrtobot()); +} + +//extern BuiltIn Y_cclrtoeol; + +//extern int clrtoeol(void ); +void +Y_cclrtoeol(int n) +{ + if (n>1) YError("cclrtoeol takes void argument"); + PushIntValue(clrtoeol()); +} + +//extern BuiltIn Y_cbkgdset; + +//extern void bkgdset(char ); +void +Y_cbkgdset(int n) +{ + if (n!=1) YError("cbkgdset takes exactly 1 arguments"); + bkgdset(yarg_sc(0)); +} + +//extern BuiltIn Y_cgetlines; + +//extern int getlines(void ); +void +Y_cgetlines(int n) +{ + if (n>1) YError("cgetlines takes void argument"); + PushIntValue(getlines()); +} + +//extern BuiltIn Y_cgetcols; + +//extern int getcols(void ); +void +Y_cgetcols(int n) +{ + if (n>1) YError("cgetcols takes void argument"); + PushIntValue(getcols()); +} + +//extern BuiltIn Y_ccurs_set; + +//extern int curs_set(int ); +void +Y_ccurs_set(int n) +{ + if (n!=1) YError("ccurs_set takes exactly 1 arguments"); + PushIntValue(curs_set(yarg_si(0))); +} + +//extern BuiltIn Y_ccurs_move; + +//extern int move(int , int ); +void +Y_ccurs_move(int n) +{ + if (n!=2) YError("ccurs_move takes exactly 2 arguments"); + PushIntValue(move(yarg_si(1), yarg_si(0))); +} + +//extern BuiltIn Y_cbeep; + +//extern int beep(void ); +void +Y_cbeep(int n) +{ + if (n>1) YError("cbeep takes void argument"); + PushIntValue(beep()); +} + +//extern BuiltIn Y_cflash; + +//extern int flash(void ); +void +Y_cflash(int n) +{ + if (n>1) YError("cflash takes void argument"); + PushIntValue(flash()); +} + +//extern BuiltIn Y_cecho; + +//extern int echo(void ); +void +Y_cecho(int n) +{ + if (n>1) YError("cecho takes void argument"); + PushIntValue(echo()); +} + +//extern BuiltIn Y_cnoecho; + +//extern int noecho(void ); +void +Y_cnoecho(int n) +{ + if (n>1) YError("cnoecho takes void argument"); + PushIntValue(noecho()); +} + +//extern BuiltIn Y_cgetstr; + +//extern int getstr(char *); +void +Y_cgetstr(int n) +{ + if (n!=1) YError("cgetstr takes exactly 1 arguments"); + PushIntValue(getstr(yarg_sq(0))); +} + +//extern BuiltIn Y_cmvgetstr; + +//extern int mvgetstr(int , int , char *); +void +Y_cmvgetstr(int n) +{ + if (n!=3) YError("cmvgetstr takes exactly 3 arguments"); + PushIntValue(mvgetstr(yarg_si(2), yarg_si(1), yarg_sq(0))); +} + +//extern BuiltIn Y_cnodelay; + +//extern int ynodelay(int ); +void +Y_cnodelay(int n) +{ + if (n!=1) YError("cnodelay takes exactly 1 arguments"); + PushIntValue(ynodelay(yarg_si(0))); +} + +//extern BuiltIn Y_cnotimeout; + +//extern int ynotimeout(int ); +void +Y_cnotimeout(int n) +{ + if (n!=1) YError("cnotimeout takes exactly 1 arguments"); + PushIntValue(ynotimeout(yarg_si(0))); +} + +//extern BuiltIn Y_ckeypad; + +//extern int ykeypad(int ); +void +Y_ckeypad(int n) +{ + if (n!=1) YError("ckeypad takes exactly 1 arguments"); + PushIntValue(ykeypad(yarg_si(0))); +} + +//extern BuiltIn Y_cmeta; + +//extern int ymeta(int ); +void +Y_cmeta(int n) +{ + if (n!=1) YError("cmeta takes exactly 1 arguments"); + PushIntValue(ymeta(yarg_si(0))); +} + +//extern BuiltIn Y_cintrflush; + +//extern int yintrflush(int ); +void +Y_cintrflush(int n) +{ + if (n!=1) YError("cintrflush takes exactly 1 arguments"); + PushIntValue(yintrflush(yarg_si(0))); +} + +//extern BuiltIn Y_cscrollok; + +//extern int yscrollok(int ); +void +Y_cscrollok(int n) +{ + if (n!=1) YError("cscrollok takes exactly 1 arguments"); + PushIntValue(yscrollok(yarg_si(0))); +} + +//extern BuiltIn Y_cleaveok; + +//extern int yleaveok(int ); +void +Y_cleaveok(int n) +{ + if (n!=1) YError("cleaveok takes exactly 1 arguments"); + PushIntValue(yleaveok(yarg_si(0))); +} + +//extern BuiltIn Y_cclearok; + +//extern int yclearok(int ); +void +Y_cclearok(int n) +{ + if (n!=1) YError("cclearok takes exactly 1 arguments"); + PushIntValue(yclearok(yarg_si(0))); +} + +//extern BuiltIn Y_cidlok; + +//extern int yidlok(int ); +void +Y_cidlok(int n) +{ + if (n!=1) YError("cidlok takes exactly 1 arguments"); + PushIntValue(yidlok(yarg_si(0))); +} + + +/*----------------list include files */ debian/examples0000644000000000000000000000001011772354571010732 0ustar check.i debian/ynstall0000644000000000000000000000005211772354572010611 0ustar curses.info debian/yorick-curses.packinfo