mvhutz/lambda
1
0
Fork 0
Code Issues 3 Pull Requests Actions Packages Projects Releases Wiki Activity

fix: parameters converted in opposite order

Browse Source
This commit is contained in:
Maxim Hutz
2025-12-27 01:41:00 -05:00
parent 5841023dde
commit df53409887
4 changed files with 71 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
cmd/lambda/lambda.go
View File

@@ -7,6 +7,8 @@ import (
"git.maximhutz.com/max/lambda/internal/cli"
"git.maximhutz.com/max/lambda/internal/config"
"git.maximhutz.com/max/lambda/pkg/convert"
"git.maximhutz.com/max/lambda/pkg/lambda"
"git.maximhutz.com/max/lambda/pkg/saccharine"
)
@@ -16,8 +18,8 @@ func main() {
cli.HandleError(err)
logger := options.GetLogger()
logger.Info("Using program arguments.", "args", os.Args)
logger.Info("Parsed CLI options.", "options", options)
logger.Info("using program arguments", "args", os.Args)
logger.Info("parsed CLI options", "options", options)
input, err := options.Source.Pull()
cli.HandleError(err)
@@ -25,29 +27,32 @@ func main() {
// Parse tokens.
tokens, err := saccharine.GetTokens([]rune(input))
cli.HandleError(err)
logger.Info("Parsed tokens.", "tokens", tokens)
logger.Info("parsed tokens", "tokens", tokens)
// Turn tokens into syntax tree.
expression, err := saccharine.Parse(tokens)
cli.HandleError(err)
logger.Info("Parsed syntax tree.", "tree", expression)
logger.Info("parsed syntax tree", "tree", saccharine.Stringify(expression))
compiled := convert.SaccharineToLambda(expression)
logger.Info("compiled lambda expression", "tree", lambda.Stringify(compiled))
// Reduce expression.
start := time.Now()
if options.Explanation {
fmt.Println(saccharine.Stringify(expression))
fmt.Println(lambda.Stringify(compiled))
}
// for lambda.ReduceOnce(&expression) {
// logger.Info("Reduction.", "tree", saccharine.Stringify(expression))
// if options.Explanation {
// fmt.Println(" =", saccharine.Stringify(expression))
// }
// }
for lambda.ReduceOnce(&compiled) {
logger.Info("reduction", "tree", lambda.Stringify(compiled))
if options.Explanation {
fmt.Println(" =", lambda.Stringify(compiled))
}
}
elapsed := time.Since(start).Milliseconds()
fmt.Println(saccharine.Stringify(expression))
fmt.Println(lambda.Stringify(compiled))
fmt.Fprintln(os.Stderr, "Time Spent:", elapsed, "ms")
}