added progn form

This commit is contained in:
Aidan 2020-07-18 10:44:18 -07:00
parent 8278430882
commit 44beab651c
No known key found for this signature in database
GPG key ID: 327711E983899316
3 changed files with 21 additions and 2 deletions

View file

@ -22,6 +22,17 @@ import (
"gitlab.com/whom/shs/log"
)
/* eval N forms. return the last one
*/
func shs_progn(in *ast.Token, vt ast.VarTable, ft ast.FuncTable) *ast.Token {
var res *ast.Token
for iter := in; iter != nil; iter = iter.Next {
res = iter.Eval(ft, vt, false)
}
return res
}
/* return one evaluated form or another based on the boolean statement
*/
func shs_if(in *ast.Token, vt ast.VarTable, ft ast.FuncTable) *ast.Token {