Cleanup

git-svn-id: https://spexeah.com:8443/svn/Asuro@7 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

src/console.pas

@@ -1,16 +1,3 @@
-{
-/////////////////////////////////////////////////////////
-//                                                     //
-//               Freepascal barebone OS                //
-//                       console.pas                   //
-//                                                     //
-/////////////////////////////////////////////////////////
-//
-//      By:             De Deyn Kim <[email protected]>
-//      License:        Public domain
-//
-}
- 
 unit console;
 
 interface

src/kernel.pas

@@ -1,16 +1,3 @@
-{
-/////////////////////////////////////////////////////////
-//                                                     //
-//               Freepascal barebone OS                //
-//                      kernel.pas                     //
-//                                                     //
-/////////////////////////////////////////////////////////
-//
-//      By:             De Deyn Kim <[email protected]>
-//      License:        Public domain
-//
-}
- 
 unit kernel;
  
 interface

src/multiboot.pas

@@ -4,7 +4,6 @@ interface
  
 const
         KERNEL_STACKSIZE = $4000;
- 
         MULTIBOOT_BOOTLOADER_MAGIC = $2BADB002;
  
 type
@@ -19,8 +18,8 @@ type
         Pmultiboot_info_t = ^multiboot_info_t;
         multiboot_info_t = packed record
           flags: DWORD;
-          mem_lower: DWORD; { Amount of memory available below 1mb }
-          mem_upper: DWORD; { Amount of memory available above 1mb }
+          mem_lower: DWORD;
+          mem_upper: DWORD;
           boot_device: DWORD;
           cmdline: DWORD;
           mods_count: DWORD;
@@ -41,15 +40,11 @@ type
         Pmemory_map_t = ^memory_map_t;
         memory_map_t = packed record
           size: DWORD;
-          { You can declare these two as a single qword if your compiler supports it }
-          base_addr_low: DWORD;
-          base_addr_high: DWORD;
-          { And again, these can be made into one qword variable. }
-          length_low: DWORD;
-          length_high: DWORD;
-          mtype: DWORD;
+		base_addr : QWORD;
+		length : QWORD;          
+		mtype: DWORD;
         end;
  
 implementation
  
-end.
+end.

src/stub/stub.asm

@@ -1,14 +1,3 @@
-;/////////////////////////////////////////////////////////
-;//                                                     //
-;//               Freepascal barebone OS                //
-;//                      stub.asm                       //
-;//                                                     //
-;/////////////////////////////////////////////////////////
-;//
-;//     By:             De Deyn Kim <[email protected]>
-;//     License:        Public domain
-;//
- 
 ;
 ; Kernel stub
 ;
@@ -76,4 +65,4 @@ section .bss
 ;
 align 32
 KERNEL_STACK:
-        resb KERNEL_STACKSIZE
+        resb KERNEL_STACKSIZE