Ejemplo n.º 1
0
func main() {
	s := new(stack)
	s.Push(5)
	s.Push(10)
	println(s.Pop())
}
Ejemplo n.º 2
0
func Process(statestore interface{}, gram *Grammar, symbols chan *Token, ack chan bool, parserr chan string, handlers Handlers) (interface{}, bool) {
	noerrors := make(chan bool)
	go func() {
		//         log.Stderr("error starting")
		noerr := true
		for !closed(parserr) {
			//             log.Stderr("error 1")
			r := <-parserr
			//             log.Stderr("error 2")
			if closed(parserr) {
				break
			}
			//             log.Stderr("error 3")
			log.Stderr(r)
			//             log.Stderr("error 4")
			noerr = false
		}
		//         log.Stderr("error forloop done")
		if !noerr {
			noerrors <- false
		} else {
			noerrors <- true
		}
		close(noerrors)
		//         log.Stderr("error done")
	}()

	success := make(chan bool)
	var final *Value
	go func() {
		stack := NewStack()
		for r := range symbols {
			var top *Value
			if stack.Empty() {
				top = nil
			} else {
				top = stack.Peek()
			}
			if gram.ALL[r.Id()].Terminal {
				//                 fmt.Printf("%-4v %15v %15v\n", gram.ALL[r.Id()].Name, r.Attr(), "terminal")
				top.AddArg(r.Attr())
			}
			collapse(statestore, gram, stack, handlers)
			if !gram.ALL[r.Id()].Terminal {
				//                 i, _ := strconv.Atoi(r.Attr())
				//                 fmt.Printf("%-4v %15v %15v\n", gram.ALL[r.Id()].Name, p_to_str(gram.P[i], gram), "nonterminal")
				stack.Push(NewValue(gram, r))
			}
			collapse(statestore, gram, stack, handlers)
			ack <- true
		}
		if stack.Len() != 1 {
			//             log.Stderr("fatal processing error in parser, symbols still on stack", stack)
			success <- false
		} else {
			final = stack.Pop()
			success <- true
		}
		close(success)
	}()
	//     fmt.Println("proc -------->", gram.ALL[p.Token.Id()].Name, p.Args)
	r1 := <-success
	r2 := <-noerrors
	<-success
	<-noerrors
	//     log.Stderr("main 1")
	ret := r1 && r2
	if !ret {
		return nil, false
	}
	return process(statestore, gram, final, handlers), ret
}
Ejemplo n.º 3
0
func (s* ForthStack) Mod() {
	s.Swap();
	stack.Push(stack.Pop() % stack.Pop());
}