From 658203507825ea983e3849c3f1e91ec0767c6874 Mon Sep 17 00:00:00 2001
From: hyung-hwan <hyunghwan.chung@gmail.com>
Date: Mon, 23 Aug 2021 23:41:19 +0000
Subject: [PATCH] minor spacing fix

---
 lib/h2-pool.adb | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/h2-pool.adb b/lib/h2-pool.adb
index 632575f..ca8cd7a 100644
--- a/lib/h2-pool.adb
+++ b/lib/h2-pool.adb
@@ -19,11 +19,11 @@ package body H2.Pool is
 			declare
 				type Pooled_Pointer is access Normal_Type;
 				for Pooled_Pointer'Storage_Pool use P.all;
-				function To_Pointer_Type is new Ada.Unchecked_Conversion (Pooled_Pointer, Pointer_Type);
+				function To_Pointer_Type is new Ada.Unchecked_Conversion(Pooled_Pointer, Pointer_Type);
 				Tmp: Pooled_Pointer;
 			begin
 				Tmp := new Normal_Type;
-				return To_Pointer_Type (Tmp);
+				return To_Pointer_Type(Tmp);
 			end; 
 		end if;
 	end Allocate;
@@ -48,7 +48,7 @@ package body H2.Pool is
 --				Tmp: Pooled_Pointer;
 --			begin
 --				Tmp := new Normal_Type'(Source);
---				return To_Pointer_Type (Tmp);
+--				return To_Pointer_Type(Tmp);
 --			end; 
 --		end if;
 --	end Allocate;