Code formatting

Src/Myc.Core.Atomic.pas

@@ -4,9 +4,9 @@ interface
 
 {$align on}
 uses
-    {$ifndef NO_FASTMM}
+{$ifndef NO_FASTMM}
     FastMM5,
-    {$endif}
+{$endif}
     Winapi.Windows;
 
 type
@@ -33,15 +33,16 @@ type
     end;
 
     TMycAtomicStack<T> = record
-    private type
-        PItem = ^TItem;
-        TItem = packed record
-            Next: TSListEntry;
-            Data: T;
-        end;
+    private
+        type
+            PItem = ^TItem;
+            TItem = packed record
+                Next: TSListEntry;
+                Data: T;
+            end;
 
-    var
-        FSList: PSList;
+        var
+            FSList: PSList;
 
     public
         // Initializes the atomic stack, creating the underlying SList.
@@ -212,7 +213,7 @@ begin
     begin
         item.Data := Default(T);
         FreeMemAligned(item); // Global procedure
-        item := PopPtr;  // Call instance method PopPtr via Dest
+        item := PopPtr; // Call instance method PopPtr via Dest
     end;
 end;