00001 /****************************************************************/ 00002 /* Tabsize() routines of the PCcurses package */ 00003 /* */ 00004 /****************************************************************/ 00005 /* This version of curses is based on ncurses, a curses version */ 00006 /* Originally written by Pavel Curtis at Cornell University. */ 00007 /* I have made substantial changes to make it run on IBM PC's, */ 00008 /* And therefore consider myself free to make it public domain. */ 00009 /* Bjorn Larsson (...mcvax!enea!infovax!bl) */ 00010 /****************************************************************/ 00011 /* 1.0: Release: 870515 */ 00012 /****************************************************************/ 00013 /* Modified to run under the MINIX operating system by Don Cope */ 00014 /* These changes are also released into the public domain. */ 00015 /* 900906 */ 00016 /****************************************************************/ 00017 00018 #include <curses.h> 00019 #include "curspriv.h" 00020 00021 /****************************************************************/ 00022 /* Wtabsize(win,ts) sets the tabsize of window 'win' to 'ts', */ 00023 /* And returns the original value. */ 00024 /****************************************************************/ 00025 00026 int wtabsize(win, ts) 00027 WINDOW *win; 00028 int ts; 00029 { 00030 int origval; 00031 00032 origval = win->_tabsize; 00033 win->_tabsize = ts; 00034 return(origval); 00035 } /* wtabsize */ 00036 00037 /****************************************************************/ 00038 /* Tabsize(ts) sets the tabsize of stdscr to 'ts', and returns */ 00039 /* The original value. */ 00040 /****************************************************************/ 00041 00042 int tabsize(ts) 00043 int ts; 00044 { 00045 int origval; 00046 00047 origval = stdscr->_tabsize; 00048 stdscr->_tabsize = ts; 00049 return(origval); 00050 } /* tabsize */
1.4.6