From bd907fe69ad0f75ad1f3d7b7cd215a4bb4b2f1f3 Mon Sep 17 00:00:00 2001
From: Emin Arslan <me@emin.engineer>
Date: Mon, 2 Feb 2026 19:53:08 +0300
Subject: [PATCH] minor changes

---
 lib/compiler/core_ast.ml | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lib/compiler/core_ast.ml b/lib/compiler/core_ast.ml
index f64691b..2529f78 100644
--- a/lib/compiler/core_ast.ml
+++ b/lib/compiler/core_ast.ml
@@ -28,8 +28,6 @@ type top_level =
 
 
 
-
-
 let rec pair_of_def : Syntactic_ast.definition Syntactic_ast.t -> string * expression = function
   | Syntactic_ast.Define (s, e) -> (s, of_expr e)
 and pair_of_binding = function
@@ -53,7 +51,7 @@ and make_apply f args =
 (* desugars this...
   (let ((x 5) (y 4)) (f x y))
   ... into this...
-  (((lambda (x) (lambda (y) ((f x) y))) 5) 4)
+  (((lambda (x) (lambda (y) ((f x) y)))  5)  4)
  *)
 and make_let bs body =
   let bs = List.map pair_of_binding bs in