test/assignconst.awk


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58

@load "testext"

BEGIN {
	print ""
	print "test:", ARGV[1]
	switch (ARGV[1] + 0) {
	case 1:
		answer_num = 43
		break
	case 2:
		++answer_num
		break
	case 3:
		--answer_num
		break
	case 4:
		answer_num++
		break
	case 5:
		answer_num--
		break
	case 6:
		answer_num += 1
		break
	case 7:
		answer_num -= 1
		break
	case 8:
		answer_num *= 1
		break
	case 9:
		answer_num /= 1
		break
	case 10:
		answer_num ^= 1
		break
	case 11:
		answer_num = answer_num "foo"
		break
	case 12:
		sub(/2/, "3", answer_num)
		break
	case 13:
		a[1] = 1
		for (answer_num in a)
			print answer_num, a[answer_num]
		break
	case 14:
		test_func(answer_num)
		break
	}
}

function test_func(val)
{
	val++
	print "in test_func, val now =", val
}