搜索引擎

开发平台：

Perl

list.c：源码内容

							/*
** Copyright (C) 1995, 1996, 1997, 1998 Hewlett-Packard Company
** Originally by Kevin Hughes, kev@kevcom.com, 3/11/94
**
** This program and library is free software; you can redistribute it and/or
** modify it under the terms of the GNU (Library) General Public License
** as published by the Free Software Foundation; either version 2
** of the License, or any later version.
**
** This program 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 (Library) General Public License for more details.
**
** You should have received a copy of the GNU (Library) General Public License
** along with this program; if not, write to the Free Software
** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
*/
#include "swish.h"
#include "list.h"
#include "mem.h"
#include "string.h"
struct swline *addswline(rp, line)
struct swline *rp;
char *line;
{
	struct swline *newnode;
	static struct swline *nodep;
	
	newnode = (struct swline *) emalloc(sizeof(struct swline));
	newnode->line = (char *) mystrdup(line);
	newnode->next = NULL;
	
	if (rp == NULL)
		rp = newnode;
	else
		nodep->next = newnode;
	
	nodep = newnode;
	
	return rp;
}

						