melrōse musical expression player

package dsl import ( "fmt" "log" "strings" "github.com/emicklei/melrose/core" ) func IsCompatibleSyntax(s string) bool { if len(s) == 0 { // ignore syntax ; you are on your own return true } mm := strings.Split(SyntaxVersion, ".") ss := strings.Split(s, ".") return mm[0] == ss[0] && ss[1] <= mm[1] } type Function struct { Keyword string Title string Description string Prefix string // for autocomplete Alias string // short notation Template string // for autocomplete in VSC Samples string // for doc generation ControlsAudio bool Tags string // space separated IsCore bool // creates a core musical object IsComposer bool // can decorate a musical object or other decorations Func any } func (f Function) Declaration() string { return f.HumanizedTemplate() } func (f Function) Markdown() string { return fmt.Sprintf("%s\n\n%s", f.Description, f.HumanizedTemplate()) } func (f Function) HumanizedTemplate() string { r := strings.NewReplacer( "${1:", "", "${2:", "", "${3:", "", "${4:", "", "}", "") return r.Replace(f.Template) } func registerFunction(m map[string]Function, k string, f Function) { f.Keyword = k if dup, ok := m[k]; ok { log.Fatal("duplicate function key detected:", k, dup) } if len(f.Alias) > 0 { if dup, ok := m[f.Alias]; ok { log.Fatal("duplicate function alias key detected:", dup) } m[f.Alias] = f } m[k] = f } func getSequenceable(v any) (core.Sequenceable, bool) { if s, ok := v.(core.Sequenceable); ok { return s, ok } if val, ok := v.(core.HasValue); ok { vv := val.Value() if s, ok := vv.(core.Sequenceable); ok { return s, ok } } return nil, false } func getPlayable(v any) (core.Playable, bool) { if val, ok := v.(core.HasValue); ok { v = val.Value() } if s, ok := v.(core.Playable); ok { return s, ok } return nil, false } func getSequenceableList(m ...any) (list []core.Sequenceable, ok bool) { ok = true for _, each := range m { if s, ok := getSequenceable(each); ok { list = append(list, s) } else { return list, false } } return } func getHasValue(val any) core.HasValue { if v, ok := val.(core.HasValue); ok { return v } return core.On(val) } // getValue returns the Value() of val iff val is a HasValue, else returns val func getValue(val any) any { if v, ok := val.(core.HasValue); ok { return v.Value() } return val }