source: trunk/texinfo/lib/substring.c@ 2637

Last change on this file since 2637 was 2617, checked in by bird, 19 years ago

GNU Texinfo 4.8

File size: 1.1 KB
Line 
1/* substring.c -- extract substring.
2 $Id: substring.c,v 1.2 2004/04/11 17:56:46 karl Exp $
3
4 Copyright (C) 1999, 2004 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
22char *
23substring (const char *start, const char *end)
24{
25 char *result = xmalloc (end - start + 1);
26 char *scan_result = result;
27 const char *scan = start;
28
29 while (scan < end)
30 *scan_result++ = *scan++;
31
32 *scan_result = 0;
33 return result;
34}
35
Note: See TracBrowser for help on using the repository browser.