# Test suite for Local_to_global.
# Copyright (C) 1998-1999, 2002-2003  Lysator Academic Computer Association.
#
# This file is part of the LysKOM server.
# 
# LysKOM is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by 
# the Free Software Foundation; either version 1, or (at your option) 
# any later version.
# 
# LysKOM is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
# for more details.
# 
# You should have received a copy of the GNU General Public License
# along with LysKOM; see the file COPYING.  If not, write to
# Lysator, c/o ISY, Linkoping University, S-581 83 Linkoping, SWEDEN,
# or the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, 
# MA 02139, USA.
#
# Please report bugs at http://bugzilla.lysator.liu.se/. 

# Check that iterators don't return a local text number that has been
# deleted in a sparse block.

l2g_start

l2g_send "I0"
l2g_send "a0 700 100"
l2g_send "a0 750 103"
l2g_send "a0 800 108"
l2g_send "u0"
simple_expect "Number of blocks: 1" "test 0"
simple_expect "First unused: 801" "test 0b"
simple_expect "0: 3 7 700 \\(sparse\\) \\\[700:100 750:103 800:108 \\\]" "test 1"
l2g_send "d0 750"
l2g_send "u0"
simple_expect "Number of blocks: 1" "test 2"
simple_expect "First unused: 801" "test 2b"
simple_expect "0: 3 8 700 \\(sparse\\) \\\[700:100 750:0 800:108 \\\]" "test 3"

l2g_send "l0 699"
simple_expect "0" "test 4"
l2g_send "l0 700"
simple_expect "100" "test 5"
l2g_send "l0 701"
simple_expect "0" "test 6"
l2g_send "l0 799"
simple_expect "0" "test 7"
l2g_send "l0 800"
simple_expect "108" "test 8"
l2g_send "l0 801"
simple_expect "0" "test 9"
l2g_send "l0 100"
simple_expect "0" "test 10"
l2g_send "l0 108"
simple_expect "0" "test 11"

l2g_send "n0 699"
simple_expect "700" "test 12"
l2g_send "n0 700"
simple_expect "800" "test 13"
l2g_send "n0 701"
simple_expect "800" "test 14"
l2g_send "n0 799"
simple_expect "800" "test 15"
l2g_send "n0 800"
simple_expect "0" "test 16"
l2g_send "n0 801"
simple_expect "0" "test 17"
l2g_send "n0 100"
simple_expect "700" "test 18"
l2g_send "n0 750"
simple_expect "800" "test 19"
l2g_send "n0 749"
simple_expect "800" "test 20"
l2g_send "D0"
l2g_stop