runtime.go

package tlps

import (
	"bytes"
	"fmt"
	"os"
)

// Runtime is struct of Runtime
type Runtime struct {
	HadError        bool
	HadRuntimeError bool
	Globals         *Environment
	Environment     *Environment
	Locals          map[Expr]int
	Scopes          *ScopeStack
	BasePath        string
}

// NewRuntime is constructor of Runtime
func NewRuntime() *Runtime {
	globals := NewEnvironment(nil)
	environment := globals

	return &Runtime{
		HadError:        false,
		HadRuntimeError: false,
		Globals:         globals,
		Environment:     environment,
		Locals:          make(map[Expr]int),
		Scopes:          NewScopeStack(),
		BasePath:        "",
	}
}

// Run runs script
func (r *Runtime) Run(source *bytes.Buffer) {

	scanner := NewScanner(r, source)
	tokens := scanner.ScanTokens()
	// for _, token := range tokens {
	// 	fmt.Println(token)
	// }

	parser := NewParser(r, tokens)
	statements, _ := parser.Parse()
	// parser.Parse()

	// Stop if there was a syntax error
	if r.HadError {
		return
	}

	// fmt.Println(NewAstPrinter().Print(statements))
	interpreter := NewInterpreter(r)

	resolver := NewResolver(r, interpreter)
	resolver.ResolveStmts(statements)

	// Stop if there was a resolution error
	if r.HadError {
		return
	}

	interpreter.Interpret(statements)
}

// ErrorMessage prints error massage at stderr
func (r *Runtime) ErrorMessage(line int, message string) {
	r.report(line, "", message)
}

// ErrorTokenMessage prints error message at stderr
func (r *Runtime) ErrorTokenMessage(token *Token, message string) {
	if token.Type == EOFTT {
		r.report(token.Line, " at end", message)
	} else {
		r.report(token.Line, " at '"+token.Lexeme+"'", message)
	}
}

// Report prints error masseg at stderr
func (r *Runtime) report(line int, where string, message string) {
	fmt.Fprintln(os.Stderr, "[line "+fmt.Sprint(line)+"] Error"+where+": "+message)
	r.HadError = true
}

// RuntimeError is error of runtime
func (r *Runtime) RuntimeError(err error) {
	e := err.(*CustomError)
	fmt.Fprint(os.Stderr, err.Error()+"\n[line "+fmt.Sprint(e.Token.Line)+"]")
	r.HadRuntimeError = true
}