Correct typo: vender -> vendor
[dragonfly.git] / contrib / texinfo / lib / substring.c
1 /* substring.c -- extract substring.
2    $Id: substring.c,v 1.1 1999/02/17 22:30:10 karl Exp $
3
4    Copyright (C) 1999 Free Software Foundation, Inc.
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 2, or (at your option)
9    any later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15
16    You should have received a copy of the GNU General Public License along
17    with this program; if not, write to the Free Software Foundation, Inc.,
18    59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
19
20 #include "system.h"
21
22 char *
23 substring (start, end)
24      char *start;
25      char *end;
26 {
27   char *result = xmalloc (end - start + 1);
28   char *scan_result = result;
29   char *scan = start;
30
31   while (scan < end)
32     *scan_result++ = *scan++;
33
34   *scan_result = 0;
35   return result;
36 }
37