58     dbmobject *dp;  in newdbmobject()  local
60     dp = PyObject_New(dbmobject, &Dbmtype);  in newdbmobject()
61     if (dp == NULL)  in newdbmobject()
63     dp->di_size = -1;  in newdbmobject()
64     dp->flags = flags;  in newdbmobject()
66     if ( (dp->di_dbm = dbm_open((char *)file, flags, mode)) == 0 ) {  in newdbmobject()
68         Py_DECREF(dp);  in newdbmobject()
71     return (PyObject *)dp;  in newdbmobject()
77 dbm_dealloc(dbmobject *dp)  in dbm_dealloc()  argument
79     if ( dp->di_dbm )  in dbm_dealloc()
80         dbm_close(dp->di_dbm);  in dbm_dealloc()
81     PyObject_Del(dp);  in dbm_dealloc()
85 dbm_length(dbmobject *dp)  in dbm_length()  argument
87     if (dp->di_dbm == NULL) {  in dbm_length()
91     if ( dp->di_size < 0 ) {  in dbm_length()
96         for ( key=dbm_firstkey(dp->di_dbm); key.dptr;  in dbm_length()
97               key = dbm_nextkey(dp->di_dbm))  in dbm_length()
99         dp->di_size = size;  in dbm_length()
101     return dp->di_size;  in dbm_length()
105 dbm_subscript(dbmobject *dp, PyObject *key)  in dbm_subscript()  argument
114     check_dbmobject_open(dp);  in dbm_subscript()
115     drec = dbm_fetch(dp->di_dbm, krec);  in dbm_subscript()
120     if ( dbm_error(dp->di_dbm) ) {  in dbm_subscript()
121         dbm_clearerr(dp->di_dbm);  in dbm_subscript()
129 dbm_ass_sub(dbmobject *dp, PyObject *v, PyObject *w)  in dbm_ass_sub()  argument
140     if (dp->di_dbm == NULL) {  in dbm_ass_sub()
144     dp->di_size = -1;  in dbm_ass_sub()
146         if ( dbm_delete(dp->di_dbm, krec) < 0 ) {  in dbm_ass_sub()
147             dbm_clearerr(dp->di_dbm);  in dbm_ass_sub()
150             if (dp->flags & O_RDWR) {  in dbm_ass_sub()
165         if ( dbm_store(dp->di_dbm, krec, drec, DBM_REPLACE) < 0 ) {  in dbm_ass_sub()
166             dbm_clearerr(dp->di_dbm);  in dbm_ass_sub()
172     if ( dbm_error(dp->di_dbm) ) {  in dbm_ass_sub()
173         dbm_clearerr(dp->di_dbm);  in dbm_ass_sub()
240     dbmobject *dp = (dbmobject *)self;  in dbm_contains()  local
244     if ((dp)->di_dbm == NULL) {  in dbm_contains()
265     val = dbm_fetch(dp->di_dbm, key);  in dbm_contains()