Working.
[idzebra-moved-to-github.git] / rset / rset.c
1 /*
2  * Copyright (C) 1994, Index Data I/S 
3  * All rights reserved.
4  * Sebastian Hammer, Adam Dickmeiss
5  *
6  * $Log: rset.c,v $
7  * Revision 1.1  1994-11-04 13:21:28  quinn
8  * Working.
9  *
10  */
11
12 /* TODO: mem management */
13
14 #include <util.h>
15
16 #include <rset.h>
17
18 RSET rset_create(const rset_control *sel, void *parms)
19 {
20     RSET new;
21
22     new = xmalloc(sizeof(*new));     /* make dynamic alloc scheme */
23     if (!(new->control = (*sel->f_create)(sel, parms)))
24         return 0;
25     return new;
26 }
27
28 void rset_delete(RSET rs)
29 {
30     if (rs->is_open)
31         rset_close(rs);
32     (*rs->control->f_delete)(rs->control);
33     xfree(rs);
34 }