File: list.c

package info (click to toggle)
grass 6.0.2-6
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 40,044 kB
  • ctags: 31,303
  • sloc: ansic: 321,125; tcl: 25,676; sh: 11,176; cpp: 10,098; makefile: 5,025; fortran: 1,846; yacc: 493; lex: 462; perl: 133; sed: 1
file content (54 lines) | stat: -rw-r--r-- 1,358 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
/*
* $Id: list.c,v 1.5 2003/09/11 16:12:48 markus Exp $
*
****************************************************************************
*
* MODULE:       Vector library 
*   	    	
* AUTHOR(S):    Original author CERL, probably Dave Gerdes.
*               Update to GRASS 5.7 Radim Blazek.
*
* PURPOSE:      Lower level functions for reading/writing/manipulating vectors.
*
* COPYRIGHT:    (C) 2001 by the GRASS Development Team
*
*               This program is free software under the GNU General Public
*   	    	License (>=v2). Read the file COPYING that comes with GRASS
*   	    	for details.
*
*****************************************************************************/
#include <stdlib.h>
#include "gis.h"
#include "Vect.h"

/* Init int_list */
int 
dig_init_list ( struct ilist *list ) 
{
    list->value = NULL;
    list->n_values = 0;
    list->alloc_values = 0;
    
    return 1;
}

/* Init add item to list */
int 
dig_list_add ( struct ilist *list, int val ) 
{
    void *p;
    int  size;
    
    if ( list->n_values == list->alloc_values ) {
	size = (list->n_values + 1000) * sizeof(int);
	p = realloc ( (void *) list->value, size ); 
        if ( p == NULL ) return 0;
        list->value = (int *) p;
	list->alloc_values = list->n_values + 1000; 
    }
   
    list->value[list->n_values] = val;
    list->n_values++;

    return 1;
}