func (cp *compiler) literal(n *parse.Primary, msg string) string {
switch n.Type {
case parse.Bareword, parse.SingleQuoted, parse.DoubleQuoted:
return n.Value
default:
cp.errorf(n.Begin(), msg)
return "" // not reached
}
}
func (cp *compiler) primary(n *parse.Primary) valuesOp {
switch n.Type {
case parse.Bareword, parse.SingleQuoted, parse.DoubleQuoted:
return literalStr(n.Value)
case parse.Variable:
qname := n.Value[1:]
if !cp.registerVariableGet(qname) {
cp.errorf(n.Begin(), "variable %s not found", n.Value)
}
return variable(qname, n.Begin())
// case parse.Wildcard:
case parse.ErrorCapture:
op := cp.chunk(n.Chunk)
return func(ec *evalCtx) []Value {
return []Value{Error{ec.peval(op)}}
}
case parse.OutputCapture:
return cp.outputCapture(n)
case parse.List:
op := cp.array(n.List)
return func(ec *evalCtx) []Value {
return []Value{NewList(op(ec)...)}
}
case parse.Lambda:
return cp.lambda(n)
case parse.Map:
return cp.map_(n)
case parse.Braced:
return cp.braced(n)
default:
// XXX: Primary types not yet implemented are just treated as
// barewords. Should report parser bug of bad PrimaryType after they
// have been implemented.
return literalStr(n.SourceText())
// panic("bad PrimaryType; parser bug")
}
}
func (cp *compiler) primary(n *parse.Primary) ValuesOp {
switch n.Type {
case parse.Bareword, parse.SingleQuoted, parse.DoubleQuoted:
return literalStr(n.Value)
case parse.Variable:
qname := n.Value
if !cp.registerVariableGet(qname) {
cp.errorf(n.Begin(), "variable %s not found", n.Value)
}
return variable(qname, n.Begin())
case parse.Wildcard:
vs := []Value{GlobPattern{[]glob.Segment{
wildcardToSegment(n.SourceText())}}}
return func(ec *EvalCtx) []Value {
return vs
}
case parse.Tilde:
cp.errorf(n.Begin(), "compiler bug: Tilde not handled in .compound")
return literalStr("~")
case parse.ErrorCapture:
op := cp.chunk(n.Chunk)
return func(ec *EvalCtx) []Value {
return []Value{Error{ec.PEval(op)}}
}
case parse.OutputCapture:
return cp.outputCapture(n)
case parse.List:
op := cp.array(n.List)
return func(ec *EvalCtx) []Value {
return []Value{NewList(op(ec)...)}
}
case parse.Lambda:
return cp.lambda(n)
case parse.Map:
return cp.map_(n)
case parse.Braced:
return cp.braced(n)
default:
cp.errorf(n.Begin(), "bad PrimaryType; parser bug")
return literalStr(n.SourceText())
}
}
func (cp *compiler) bracedOp(n *parse.Primary) ValuesOp {
return ValuesOp{cp.braced(n), n.Begin(), n.End()}
}
func (cp *compiler) map_Op(n *parse.Primary) ValuesOp {
return ValuesOp{cp.map_(n), n.Begin(), n.End()}
}
func (cp *compiler) lambdaOp(n *parse.Primary) ValuesOp {
return ValuesOp{cp.lambda(n), n.Begin(), n.End()}
}
func (cp *compiler) outputCaptureOp(n *parse.Primary) ValuesOp {
return ValuesOp{cp.outputCapture(n), n.Begin(), n.End()}
}
func (cp *compiler) primaryOp(n *parse.Primary) ValuesOp {
return ValuesOp{cp.primary(n), n.Begin(), n.End()}
}