#test of string maps containing ints

global foo

probe begin {
	for (i=0;i<11;i++)
		foo[sprint(i)] = i*i 	

	foreach (str in foo)
	 	printf("foo[%s] = %d\n", str, foo[str])

	# delete out of the middle
	delete foo["5"]
	printf("\n")
	foreach (str in foo)
	 	printf("foo[%s] = %d\n", str, foo[str])

	# delete first entry
	delete foo["1"]
	# and last entry
	delete foo["10"]
	printf("\n")
	foreach (str in foo)
	 	printf("foo[%s] = %d\n", str, foo[str])


	# change a couple
	foo["9"] = -81
	foo["4"] = -foo["4"]
	foo["3"] *= 100
	printf("\n")
	foreach (str in foo)
	 	printf("foo[%s] = %d\n", str, foo[str])


	# delete one
	delete foo["4"]
	printf("\n")
	foreach (str in foo)
	 	printf("foo[%s] = %d\n", str, foo[str])


	# delete all
	delete foo
	printf("\n")
	foreach (str in foo)
	 	printf("foo[%s] = %d\n", str, foo[str])


	# load it again
	for (i=0;i<11;i++)
		foo[sprint(i)] = i*i 	
	for (i=0;i<11;i++)
		foo[sprint(i)] += foo[sprint(i-1)]
	printf("\n")
	foreach (str in foo)
	 	printf("foo[%s] = %d\n", str, foo[str])


	exit()
}