Mercurial > mxe-octave
view src/qdbm-test.c @ 3854:85568f3159a4
binary-packages: update for cross tools
* Makefile.in: add MXE_OCTAVECONFIG and use for of-pkg building
* dist-files.mk: add of-fits-1-cross-fixes.patch, of-sockets-1-cross-fixes.patch
* src/default-octave.mk: use --enable-cross-tools not --enable-cross-mkoctfile and
install octave-config
* src/of-fits-1-cross-fixes.patch: new file
* src/of-fits.mk: enable package compile
* src/of-fl-core-1-fixes.patch: new file
* src/of-fl-core.mk: enable pkg conpile
* src/of-sockets-1-cross-fixes.patch: new file
* src/of-sockets.mk: enable pkg conpile
author | John Donoghue |
---|---|
date | Fri, 20 Mar 2015 14:39:17 -0400 |
parents | e7c40b6c3e66 |
children |
line wrap: on
line source
/* * This file is part of MXE. * See index.html for further information. * * Taken from examples at http://fallabs.com/qdbm/spex.html */ #include <depot.h> #include <stdlib.h> #include <stdio.h> #define NAME "mikio" #define NUMBER "000-1234-5678" #define DBNAME "book" int main(int argc, char **argv){ DEPOT *depot; char *val; (void)argc; (void)argv; /* open the database */ if(!(depot = dpopen(DBNAME, DP_OWRITER | DP_OCREAT, -1))){ fprintf(stderr, "dpopen: %s\n", dperrmsg(dpecode)); return 1; } /* store the record */ if(!dpput(depot, NAME, -1, NUMBER, -1, DP_DOVER)){ fprintf(stderr, "dpput: %s\n", dperrmsg(dpecode)); } /* retrieve the record */ if(!(val = dpget(depot, NAME, -1, 0, -1, NULL))){ fprintf(stderr, "dpget: %s\n", dperrmsg(dpecode)); } else { printf("Name: %s\n", NAME); printf("Number: %s\n", val); free(val); } /* close the database */ if(!dpclose(depot)){ fprintf(stderr, "dpclose: %s\n", dperrmsg(dpecode)); return 1; } return 0; }