Subversion Repositories Open64

[/] [sim/] [fsim/] [shell/] [tclsh/] [readline/] [examples/] [rltest.c] - Rev 2072

Compare with Previous | Blame | View Log

/* **************************************************************** */
/*                    */
/*      Testing Readline          */
/*                    */
/* **************************************************************** */

/* Copyright (C) 1987-2002 Free Software Foundation, Inc.

   This file is part of the GNU Readline Library, a library for
   reading lines of text with interactive input and history editing.

   The GNU Readline Library is free software; you can redistribute it
   and/or modify it under the terms of the GNU General Public License
   as published by the Free Software Foundation; either version 2, or
   (at your option) any later version.

   The GNU Readline Library is distributed in the hope that it will be
   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   The GNU General Public License is often shipped with GNU software, and
   is generally kept in a file called COPYING or LICENSE.  If you do not
   have a copy of the license, write to the Free Software Foundation,
   59 Temple Place, Suite 330, Boston, MA 02111 USA. */

#if defined (HAVE_CONFIG_H)
#include <config.h>
#endif

#include <stdio.h>
#include <sys/types.h>

#ifdef HAVE_STDLIB_H
#  include <stdlib.h>
#else 
extern void exit();
#endif

#ifdef READLINE_LIBRARY
#  include "readline.h"
#  include "history.h"
#else
#  include <readline/readline.h>
#  include <readline/history.h>
#endif

extern HIST_ENTRY **history_list ();

main ()
{
  char *temp, *prompt;
  int done;

  temp = (char *)NULL;
  prompt = "readline$ ";
  done = 0;

  while (!done)
    {
      temp = readline (prompt);

      /* Test for EOF. */
      if (!temp)
  exit (1);

      /* If there is anything on the line, print it and remember it. */
      if (*temp)
  {
    fprintf (stderr, "%s\r\n", temp);
    add_history (temp);
  }

      /* Check for `command' that we handle. */
      if (strcmp (temp, "quit") == 0)
  done = 1;

      if (strcmp (temp, "list") == 0)
  {
    HIST_ENTRY **list;
    register int i;

    list = history_list ();
    if (list)
      {
        for (i = 0; list[i]; i++)
    fprintf (stderr, "%d: %s\r\n", i, list[i]->line);
      }
  }
      free (temp);
    }
  exit (0);
}

Compare with Previous | Blame | View Log