ncurses 5.7 - patch 20090221
[ncurses.git] / ncurses / base / lib_winch.c
index 119c731ebe3b92ba9979224c2e2bbe2c82bacc67..5fb3f9e3aaf67dbe54d29be65623cbc4fbc995a3 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 1998 Free Software Foundation, Inc.                        *
+ * Copyright (c) 1998,2000,2001 Free Software Foundation, Inc.              *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
 
 #include <curses.priv.h>
 
-MODULE_ID("$Id: lib_winch.c,v 1.1 1998/11/14 22:06:09 tom Exp $")
+MODULE_ID("$Id: lib_winch.c,v 1.6 2008/11/16 00:19:59 juergen Exp $")
 
-chtype winch(WINDOW *win)
+NCURSES_EXPORT(chtype)
+winch(WINDOW *win)
 {
-       T((T_CALLED("winch(%p)"), win));
-       if (win != 0) {
-               returnCode(win->_line[win->_cury].text[win->_curx]);
-       } else {
-               returnCode(0);
-       }
+    T((T_CALLED("winch(%p)"), win));
+    if (win != 0) {
+       returnChtype(CharOf(win->_line[win->_cury].text[win->_curx]) |
+                    AttrOf(win->_line[win->_cury].text[win->_curx]));
+    } else {
+       returnChtype(0);
+    }
 }