Mercurial > octave-nkf

changeset 474:4e6f2e50e173

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-06-21 20:38:16 by jwe]
author jwe
date Tue, 21 Jun 1994 20:38:19 +0000
parents 794b6f480d72
children 28167349d46a
files src/builtins.cc src/g-builtins.h
diffstat 2 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/builtins.cc	Tue Jun 21 15:50:34 1994 +0000
+++ b/src/builtins.cc	Tue Jun 21 20:38:19 1994 +0000
@@ -454,6 +454,9 @@
   { "isstr", 2, 1, builtin_isstr,
     "isstr (X): return 1 if X is a string", },
 
+  { "kbhit", 1, 1, builtin_kbhit,
+    "kbhit: get a single character from the terminal", },
+
   { "keyboard", 2, 1, builtin_keyboard,
     "keyboard (\"prompt\"): maybe help in debugging function files", },
 
--- a/src/g-builtins.h	Tue Jun 21 15:50:34 1994 +0000
+++ b/src/g-builtins.h	Tue Jun 21 20:38:19 1994 +0000
@@ -87,6 +87,7 @@
 extern tree_constant *builtin_inv (const tree_constant *, int, int);
 extern tree_constant *builtin_is_global (const tree_constant *, int, int);
 extern tree_constant *builtin_isstr (const tree_constant *, int, int);
+extern tree_constant *builtin_kbhit (const tree_constant *, int, int);
 extern tree_constant *builtin_keyboard (const tree_constant *, int, int);
 extern tree_constant *builtin_logm (const tree_constant *, int, int);
 extern tree_constant *builtin_lpsolve (const tree_constant *, int, int);