diff options
| author | Jakob L. Kreuze | 2023-05-24 14:13:05 -0400 |
|---|---|---|
| committer | Jakob L. Kreuze | 2023-05-24 14:13:05 -0400 |
| commit | 8e646640f2f6400777dddf2721ea1d1bf7a5a834 (patch) | |
| tree | 457dd82a1cef7a12dc9128acf190f924b6195f00 | |
| parent | 8c15e5eb689c607e055333930218ad323f2c373f (diff) | |
No action necessary for `compile-object-literal'
| -rw-r--r-- | compiler/main.scm | 2 | ||||
| -rw-r--r-- | compiler/passes/compile-object-literal.scm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/compiler/main.scm b/compiler/main.scm index 536d980..fbdffae 100644 --- a/compiler/main.scm +++ b/compiler/main.scm @@ -51,7 +51,7 @@ of `(program-arguments)'." (policy (compile-comprehensions policy)) (policy (compile-exists-some policy)) (policy (compile-for-all policy)) - ;; (policy (compile-object-literal policy)) + (policy (compile-object-literal policy)) ;; (policy (extract-identifiers policy)) ;; (policy (lift-implicit-anonymous policy)) ;; (policy (compile-constraints policy)) diff --git a/compiler/passes/compile-object-literal.scm b/compiler/passes/compile-object-literal.scm index 02c1986..3daa69c 100644 --- a/compiler/passes/compile-object-literal.scm +++ b/compiler/passes/compile-object-literal.scm @@ -25,7 +25,7 @@ (define (compile-object-literal policy) (policy-map policy - (lambda (scope breadcrumb form) + (lambda (_scope _breadcrumb form) (match form (($ <constant> ($ <object-literal> pairs)) |