daily update
[gdb/gnu.git] / readline / examples / rltest.c
blob78e2608688506c82870962c8477c79cd931be8e4
1 /* **************************************************************** */
2 /* */
3 /* Testing Readline */
4 /* */
5 /* **************************************************************** */
7 /* Copyright (C) 1987-2009 Free Software Foundation, Inc.
9 This file is part of the GNU Readline Library (Readline), a library for
10 reading lines of text with interactive input and history editing.
12 Readline is free software: you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation, either version 3 of the License, or
15 (at your option) any later version.
17 Readline is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
22 You should have received a copy of the GNU General Public License
23 along with Readline. If not, see <http://www.gnu.org/licenses/>.
26 #if defined (HAVE_CONFIG_H)
27 #include <config.h>
28 #endif
30 #include <stdio.h>
31 #include <sys/types.h>
33 #ifdef HAVE_STDLIB_H
34 # include <stdlib.h>
35 #else
36 extern void exit();
37 #endif
39 #ifdef READLINE_LIBRARY
40 # include "readline.h"
41 # include "history.h"
42 #else
43 # include <readline/readline.h>
44 # include <readline/history.h>
45 #endif
47 extern HIST_ENTRY **history_list ();
49 main ()
51 char *temp, *prompt;
52 int done;
54 temp = (char *)NULL;
55 prompt = "readline$ ";
56 done = 0;
58 while (!done)
60 temp = readline (prompt);
62 /* Test for EOF. */
63 if (!temp)
64 exit (1);
66 /* If there is anything on the line, print it and remember it. */
67 if (*temp)
69 fprintf (stderr, "%s\r\n", temp);
70 add_history (temp);
73 /* Check for `command' that we handle. */
74 if (strcmp (temp, "quit") == 0)
75 done = 1;
77 if (strcmp (temp, "list") == 0)
79 HIST_ENTRY **list;
80 register int i;
82 list = history_list ();
83 if (list)
85 for (i = 0; list[i]; i++)
86 fprintf (stderr, "%d: %s\r\n", i, list[i]->line);
89 free (temp);
91 exit (0);