public/tests/go/func/test_listforeach.go

package main

import (
	"strconv"

	"../lib"
	"./correct"
	"./student"
)

type Node7 = student.NodeL
type List7 = correct.List
type NodeS7 = correct.NodeL
type ListS7 = student.List

func listToStringStu8(l *ListS7) string {
	var res string
	it := l.Head
	for it != nil {
		switch it.Data.(type) {
		case int:
			res += strconv.Itoa(it.Data.(int)) + "-> "
		case string:
			res += it.Data.(string) + "-> "
		}
		it = it.Next
	}
	res += "<nil>"
	return res
}

func listPushBackTest7(l1 *ListS7, l2 *List7, data interface{}) {
	n := &Node7{Data: data}
	n1 := &NodeS7{Data: data}
	if l1.Head == nil {
		l1.Head = n
	} else {
		iterator := l1.Head
		for iterator.Next != nil {
			iterator = iterator.Next
		}
		iterator.Next = n
	}
	if l2.Head == nil {
		l2.Head = n1
	} else {
		iterator1 := l2.Head
		for iterator1.Next != nil {
			iterator1 = iterator1.Next
		}
		iterator1.Next = n1
	}
}

func comparFuncList7(l1 *List7, l2 *ListS7, f func(*Node7)) {
	funcName := correct.GetName(f)
	for l1.Head != nil || l2.Head != nil {
		if (l1.Head == nil && l2.Head != nil) || (l1.Head != nil && l2.Head == nil) {
			lib.Fatalf("\nstudent list: %s\nlist: %s\nfunction used: %s\n\nListForEach() == %v instead of %v\n\n",
				listToStringStu8(l2), correct.ListToString(l1.Head), funcName, l2.Head, l1.Head)
		}
		if l1.Head.Data != l2.Head.Data {
			lib.Fatalf("\nstudent list: %s\nlist: %s\nfunction used: %s\n\nListForEach() == %v instead of %v\n\n",
				listToStringStu8(l2), correct.ListToString(l1.Head), funcName, l2.Head.Data, l1.Head.Data)
		}
		l1.Head = l1.Head.Next
		l2.Head = l2.Head.Next
	}
}

// applies a function to the correct.ListS
func main() {
	link1 := &List7{}
	link2 := &ListS7{}
	table := []correct.NodeTest{}
	table = correct.ElementsToTest(table)
	table = append(table,
		correct.NodeTest{
			Data: []interface{}{"I", 1, "something", 2},
		},
	)
	for _, arg := range table {
		for i := 0; i < len(arg.Data); i++ {
			listPushBackTest7(link2, link1, arg.Data[i])
		}
		student.ListForEach(link2, student.Add2_node)
		correct.ListForEach(link1, correct.Add2_node)

		comparFuncList7(link1, link2, student.Add2_node)

		student.ListForEach(link2, student.Subtract3_node)
		correct.ListForEach(link1, correct.Subtract3_node)

		comparFuncList7(link1, link2, student.Subtract3_node)

		link1 = &List7{}
		link2 = &ListS7{}
	}
}