74 lines
1.5 KiB
Go
74 lines
1.5 KiB
Go
// Copyright (c) 2024 Celestino Amoroso (celestino.amoroso@gmail.com).
|
|
// All rights reserved.
|
|
|
|
// operator-unset.go
|
|
package expr
|
|
|
|
import (
|
|
"strings"
|
|
|
|
"git.portale-stac.it/go-pkg/expr/kern"
|
|
)
|
|
|
|
//-------- unset term
|
|
|
|
func newUnsetTerm(tk *Token) (inst *term) {
|
|
return &term{
|
|
tk: *tk,
|
|
children: make([]*term, 0, 1),
|
|
position: posPrefix,
|
|
priority: priSign,
|
|
evalFunc: evalUnset,
|
|
}
|
|
}
|
|
|
|
func deleteContextItem(ctx kern.ExprContext, opTerm *term, item any) (deleted bool, err error) {
|
|
if name, ok := item.(string); ok {
|
|
var size int
|
|
if strings.HasSuffix(name, "()") {
|
|
size = ctx.FuncCount()
|
|
ctx.DeleteFunc(strings.TrimRight(name, "()"))
|
|
deleted = ctx.FuncCount() < size
|
|
} else {
|
|
size = ctx.VarCount()
|
|
ctx.DeleteVar(name)
|
|
deleted = ctx.VarCount() < size
|
|
}
|
|
} else {
|
|
err = opTerm.errIncompatiblePrefixPostfixType(item)
|
|
}
|
|
return
|
|
}
|
|
|
|
func evalUnset(ctx kern.ExprContext, opTerm *term) (v any, err error) {
|
|
var childValue any
|
|
var deleted bool
|
|
|
|
if childValue, err = opTerm.evalPrefix(ctx); err != nil {
|
|
return
|
|
}
|
|
|
|
count := 0
|
|
if kern.IsList(childValue) {
|
|
list, _ := childValue.(*kern.ListType)
|
|
for _, item := range *list {
|
|
if deleted, err = deleteContextItem(ctx, opTerm, item); err != nil {
|
|
break
|
|
} else if deleted {
|
|
count++
|
|
}
|
|
}
|
|
} else if deleted, err = deleteContextItem(ctx, opTerm, childValue); err == nil && deleted {
|
|
count++
|
|
}
|
|
if err == nil {
|
|
v = int64(count)
|
|
}
|
|
return
|
|
}
|
|
|
|
// init
|
|
func init() {
|
|
registerTermConstructor(SymKwUnset, newUnsetTerm)
|
|
}
|