environ_test.go

package goscm

import (
	"testing"
)

func Test_Environment(t *testing.T) {
	// Making a top-level environment
	top := NewEnv(nil)
	if top.String() != "#<environment>" {
		t.Error()
	}

	// Adding to an environment and retrieving
	top.Add(NewSymbol("foo"), NewPlainInt(9987654))
	ret, err := top.Find(NewSymbol("FoO"))
	if err != nil {	t.Error(err) }
	ans, ok := ret.(*PlainInt)
	if !ok { t.Error(ok) }
	if ans.String() != "9987654" { t.Error(ans) }
	
	// Making a child environment and retrieving from it
	env := NewEnv(top)
	env.Add(NewSymbol("bar"), NewPlainInt(9987666))
	ret, err = env.Find(NewSymbol("BAR"))
	if err != nil { t.Error(err) }
	ans, ok = ret.(*PlainInt)
	if !ok { t.Error(ok) }
	if ans.String() != "9987666" { t.Error(ans) }
	
	// Retrieving from a parent environment from a child
	ret, err = env.Find(NewSymbol("foo"))
	if err != nil { t.Error(err) }
	ans, ok = ret.(*PlainInt)
	if !ok { t.Error(ok) }
	if ans.String() != "9987654" { t.Error(ans) }
}