| 1 | /* close.c - Close the "original" style database. */
|
|---|
| 2 |
|
|---|
| 3 | /* This file is part of GDBM, the GNU data base manager, by Philip A. Nelson.
|
|---|
| 4 | Copyright (C) 1993 Free Software Foundation, Inc.
|
|---|
| 5 |
|
|---|
| 6 | GDBM 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 | GDBM 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
|
|---|
| 17 | along with GDBM; see the file COPYING. If not, write to
|
|---|
| 18 | the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
|
|---|
| 19 |
|
|---|
| 20 | You may contact the original author by:
|
|---|
| 21 | e-mail: [email protected]
|
|---|
| 22 | us-mail: Philip A. Nelson
|
|---|
| 23 | Computer Science Department
|
|---|
| 24 | Western Washington University
|
|---|
| 25 | Bellingham, WA 98226
|
|---|
| 26 |
|
|---|
| 27 | The author of this file is:
|
|---|
| 28 | e-mail: [email protected]
|
|---|
| 29 |
|
|---|
| 30 | *************************************************************************/
|
|---|
| 31 |
|
|---|
| 32 |
|
|---|
| 33 | /* include system configuration before all else. */
|
|---|
| 34 | #include "autoconf.h"
|
|---|
| 35 |
|
|---|
| 36 | #include "gdbmdefs.h"
|
|---|
| 37 | #include "extern.h"
|
|---|
| 38 |
|
|---|
| 39 |
|
|---|
| 40 | /* it's unclear whether dbmclose() is *always* a void function in old
|
|---|
| 41 | C libraries. we use int, here. */
|
|---|
| 42 |
|
|---|
| 43 | int
|
|---|
| 44 | dbmclose()
|
|---|
| 45 | {
|
|---|
| 46 | if (_gdbm_file != NULL)
|
|---|
| 47 | {
|
|---|
| 48 | gdbm_close (_gdbm_file);
|
|---|
| 49 | _gdbm_file = NULL;
|
|---|
| 50 | if (_gdbm_memory.dptr != NULL) free(_gdbm_memory.dptr);
|
|---|
| 51 | _gdbm_memory.dptr = NULL;
|
|---|
| 52 | _gdbm_memory.dsize = 0;
|
|---|
| 53 | }
|
|---|
| 54 | return (0);
|
|---|
| 55 | }
|
|---|
