43 lines
1,019 B
Go
43 lines
1,019 B
Go
|
// Copyright 2010 The postscript-go Authors. All rights reserved.
|
||
|
|
// created: 13/12/2010 by Laurent Le Goff
|
||
|
|
|
||
|
|
// Miscellaneous Operators
|
||
|
|
package postscript
|
||
|
|
|
||
|
|
import (
|
||
|
|
"log"
|
||
|
|
)
|
||
|
|
|
||
|
|
//proc bind proc Replace operator names in proc with operators; perform idiom recognition
|
||
|
|
func bind(interpreter *Interpreter) {
|
||
|
|
pdef := interpreter.PopProcedureDefinition()
|
||
|
|
values := make([]Value, len(pdef.Values))
|
||
|
|
for i, value := range pdef.Values {
|
||
|
|
if s, ok := value.(string); ok {
|
||
|
|
firstChar := s[0]
|
||
|
|
if firstChar != '(' && firstChar != '/' {
|
||
|
|
v, _ := interpreter.FindValueInDictionaries(s)
|
||
|
|
operator, isOperator := v.(Operator)
|
||
|
|
if v == nil {
|
||
|
|
log.Printf("Can't find def: %s\n", s)
|
||
|
|
}
|
||
|
|
if isOperator {
|
||
|
|
values[i] = operator
|
||
|
|
} else {
|
||
|
|
values[i] = value
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
values[i] = value
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
values[i] = value
|
||
|
|
}
|
||
|
|
}
|
||
|
|
pdef.Values = values
|
||
|
|
interpreter.Push(pdef)
|
||
|
|
}
|
||
|
|
|
||
|
|
func initMiscellaneousOperators(interpreter *Interpreter) {
|
||
|
|
interpreter.SystemDefine("bind", NewOperator(bind))
|
||
|
|
}
|