tests/fetch00.at

   1 # This file is part of GDBM.                                   -*- autoconf -*-
   2 # Copyright (C) 2011 Free Software Foundation, Inc.
   3 #
   4 # GDBM is free software; you can redistribute it and/or modify
   5 # it under the terms of the GNU General Public License as published by
   6 # the Free Software Foundation; either version 2, or (at your option)
   7 # any later version.
   8 #
   9 # GDBM is distributed in the hope that it will be useful,
  10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 # GNU General Public License for more details.
  13 #
  14 # You should have received a copy of the GNU General Public License
  15 # along with GDBM. If not, see <http://www.gnu.org/licenses/>. */
  16
  17 AT_SETUP([fetch a record])
  18 AT_KEYWORDS([gdbm fetch fetch00])
  19
  20 AT_CHECK([
  21 num2word 1:10000 | gtload test.db
  22 gtfetch test.db 1 2745 9999
  23 ],
  24 [0],
  25 [one
  26 two thousand seven hundred and fourty-five
  27 nine thousand nine hundred and ninety-nine
  28 ])
  29
  30 AT_CLEANUP
  31