affine/SHS
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

update stdlib append after testing

Browse source
This commit is contained in:
Aidan 2020-06-21 13:13:46 -07:00
parent 9c25ac21f9
commit fe5afcb345
No known key found for this signature in database
GPG key ID: 327711E983899316
3 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
ast/eval.go
View file

@ -56,7 +56,7 @@ func (t *Token) Eval(funcs FuncTable, vars VarTable) *Token {
if f == nil { if f == nil {
if !eligibleForSystemCall { if !eligibleForSystemCall {
log.Log(log.DEBUG, log.Log(log.DEBUG,
"could not find definition for symbol " + ret.Inner.(string), "could not find definition for symbol " + ret.Inner.(string),
"eval") "eval")
return nil return nil
} }

3
ast/print.go
View file

@ -38,7 +38,8 @@ func (t *Token) String() string {
for i := t.Inner.(*Token); i != nil; i = i.Next { for i := t.Inner.(*Token); i != nil; i = i.Next {
repr = repr + i.String() + " " repr = repr + i.String() + " "
} }
return repr + ")" // remove trailing space
return repr[:len(repr)-1] + ")"
case SYMBOL: case SYMBOL:
return "<" + t.Inner.(string) + ">" return "<" + t.Inner.(string) + ">"

7
stdlib/list.go
View file

@ -45,9 +45,8 @@ func l_append(input *ast.Token, vars ast.VarTable, funcs ast.FuncTable) *ast.Tok
src := input src := input
if input.Tag != ast.LIST { if input.Tag != ast.LIST {
// TODO: Position, if I can figure out what to do with it // TODO: position??
src = &ast.Token{Tag: ast.LIST, Inner: input} return input
return src
} }
// deref inner first // deref inner first
@ -63,5 +62,5 @@ func l_append(input *ast.Token, vars ast.VarTable, funcs ast.FuncTable) *ast.Tok
} }
(*iter).Next = input.Next (*iter).Next = input.Next
return src return *iter
} }