hsshellscript 3.4.0 → 3.4.1
raw patch · 5 files changed
+9/−33 lines, 5 filesdep ~basedep ~directorydep ~parsecPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: base, directory, parsec
API changes (from Hackage documentation)
Files
- Makefile +1/−2
- hsshellscript.cabal +1/−1
- src/cbits/hsshellscript.c +7/−13
- test/Makefile +0/−1
- test/cteile.c +0/−16
Makefile view
@@ -1,5 +1,4 @@-# nächste Version:-VERSION = 3.4.0+VERSION = 3.4.1 default :: lib
hsshellscript.cabal view
@@ -1,5 +1,5 @@ Name: hsshellscript-Version: 3.4.0+Version: 3.4.1 Synopsis: Haskell for Unix shell scripting tasks Description: A Haskell-library for tasks which are usually done in shell scripts. This includes parsing command line
src/cbits/hsshellscript.c view
@@ -133,20 +133,14 @@ return old_flags; } -int c_terminal_width_stdout(void)+// Thanks to Jan-Benedict Glaw for this+int c_terminal_width(int fd) {+ int res; struct winsize size;- if (ioctl (STDOUT_FILENO, TIOCGWINSZ, &size) == -1)- return -1;- else - return size.ws_col;-} -int c_terminal_width_stderr(void)-{- struct winsize size;- if (ioctl (STDERR_FILENO, TIOCGWINSZ, &size) == -1)- return -1;- else - return size.ws_col;+ res = ioctl (fd, TIOCGWINSZ, &size);++ if (res == -1) return -1;+ else return size.ws_col; }
test/Makefile view
@@ -1,4 +1,3 @@-VERSION=3.4.0 CFLAGS=-XDeriveDataTypeable PROG_HS = $(notdir $(basename $(wildcard [_abcdefghijklmnopqrstuvwxyzäöü]*.hs)))
test/cteile.c view
@@ -36,19 +36,3 @@ printf("\", Länge = %d\n",len); } ----//------------------------------------------------------------------------------------------------------// Thanks to Jan-Benedict Glaw for this-int c_terminal_width(int fd)-{- int res;- struct winsize size;-- res = ioctl (fd, TIOCGWINSZ, &size);-- if (res == -1) return -1;- else return size.ws_col;-}