diff --git a/platform_linux/linux_4ed.cpp b/platform_linux/linux_4ed.cpp
index 9a9ba270..267e72c1 100644
--- a/platform_linux/linux_4ed.cpp
+++ b/platform_linux/linux_4ed.cpp
@@ -54,12 +54,8 @@
 #include <time.h>
 #include <locale.h>
 #include <memory.h>
-#include <dirent.h>
 #include <dlfcn.h>
-#include <unistd.h>
 #include <xmmintrin.h>
-#include <fcntl.h>
-#include <errno.h>
 #include <pthread.h>
 #include <semaphore.h>
 #include <signal.h>
@@ -69,7 +65,6 @@
 #include <sys/ioctl.h>
 #include <sys/time.h>
 #include <sys/wait.h>
-#include <sys/stat.h>
 #include <sys/timerfd.h>
 #include <sys/eventfd.h>
 #include <sys/epoll.h>
@@ -246,283 +241,6 @@ internal             Sys_Release_Lock_Sig(system_release_lock);
 internal void        system_wait_cv(i32, i32);
 internal void        system_signal_cv(i32, i32);
 
-#if 0
-//
-// Shared system functions (system_shared.h)
-//
-
-internal
-Sys_File_Can_Be_Made_Sig(system_file_can_be_made){
-    b32 result = access((char*)filename, W_OK) == 0;
-    LINUX_FN_DEBUG("%s = %d", filename, result);
-    return(result);
-}
-
-internal
-Sys_Get_Binary_Path_Sig(system_get_binary_path){
-    ssize_t size = readlink("/proc/self/exe", out->str, out->memory_size - 1);
-    if(size != -1 && size < out->memory_size - 1){
-        out->size = size;
-        remove_last_folder(out);
-        terminate_with_null(out);
-        size = out->size;
-    } else {
-        size = 0;
-    }
-    
-    return size;
-}
-#endif
-
-//
-// Files
-//
-
-internal
-Sys_Set_File_List_Sig(system_set_file_list){
-    DIR *d;
-    struct dirent *entry;
-    char *fname, *cursor, *cursor_start;
-    File_Info *info_ptr;
-    i32 character_count, file_count, size, required_size, length;
-    b32 clear_list = false;
-    
-    if(directory == 0){
-        system_memory_free(file_list->block, file_list->block_size);
-        file_list->block = 0;
-        file_list->block_size = 0;
-        file_list->infos = 0;
-        file_list->count = 0;
-        return;
-    }
-    
-    LINUX_FN_DEBUG("%s", directory);
-    
-    d = opendir(directory);
-    if (d){
-        if (canon_directory_out != 0){
-            u32 length = copy_fast_unsafe_cc(canon_directory_out, directory);
-            if (canon_directory_out[length-1] != '/'){
-                canon_directory_out[length++] = '/';
-            }
-            canon_directory_out[length] = 0;
-            *canon_directory_size_out = length;
-        }
-        
-        character_count = 0;
-        file_count = 0;
-        for (entry = readdir(d);
-             entry != 0;
-             entry = readdir(d)){
-            fname = entry->d_name;
-            if (match_cc(fname, ".") || match_cc(fname, "..")){
-                continue;
-            }
-            ++file_count;            
-            for (size = 0; fname[size]; ++size);
-            character_count += size + 1;
-        }
-        
-        required_size = character_count + file_count * sizeof(File_Info);
-        if (file_list->block_size < required_size){
-            system_memory_free(file_list->block, file_list->block_size);
-            file_list->block = system_memory_allocate(required_size);
-            file_list->block_size = required_size;
-        }
-        
-        file_list->infos = (File_Info*)file_list->block;
-        cursor = (char*)(file_list->infos + file_count);
-        
-        if (file_list->block != 0){
-            rewinddir(d);
-            info_ptr = file_list->infos;
-            for (entry = readdir(d);
-                 entry != 0;
-                 entry = readdir(d)){
-                fname = entry->d_name;
-                if (match_cc(fname, ".") || match_cc(fname, "..")){
-                    continue;
-                }
-                cursor_start = cursor;
-                length = copy_fast_unsafe_cc(cursor_start, fname);
-                cursor += length;
-                
-                if(entry->d_type == DT_LNK){
-                    struct stat st;
-                    if(stat(entry->d_name, &st) != -1){
-                        info_ptr->folder = S_ISDIR(st.st_mode);
-                    } else {
-                        info_ptr->folder = 0;
-                    }
-                } else {
-                    info_ptr->folder = (entry->d_type == DT_DIR);
-                }
-                
-                info_ptr->filename = cursor_start;
-                info_ptr->filename_len = length;
-                *cursor++ = 0;
-                ++info_ptr;
-            }
-        }
-        
-        file_list->count = file_count;
-        
-        closedir(d);
-    } else {
-        system_memory_free(file_list->block, file_list->block_size);
-        file_list->block = 0;
-        file_list->block_size = 0;
-        file_list->infos = 0;
-        file_list->count = 0;
-    }
-}
-
-internal
-Sys_Get_Canonical_Sig(system_get_canonical){
-    char* path = (char*) alloca(len + 1);
-    char* write_p = path;
-    const char* read_p = filename;
-    
-    // return 0 for relative paths (e.g. cmdline args)
-    if(len > 0 && filename[0] != '/'){
-        return 0;
-    }
-    
-    if (max == 0){
-        return 0;
-    }
-    
-    max -= 1;
-    
-    while(read_p < filename + len){
-        if(read_p == filename || read_p[0] == '/'){
-            if(read_p[1] == '/'){
-                ++read_p;
-            } else if(read_p[1] == '.'){
-                if(read_p[2] == '/' || !read_p[2]){
-                    read_p += 2;
-                } else if(read_p[2] == '.' && (read_p[3] == '/' || !read_p[3])){
-                    while(write_p > path && *--write_p != '/');
-                    read_p += 3;
-                } else {
-                    *write_p++ = *read_p++;
-                }
-            } else {
-                *write_p++ = *read_p++;
-            }
-        } else {
-            *write_p++ = *read_p++;
-        }
-    }
-    if(write_p == path) *write_p++ = '/';
-    
-    if(max >= (write_p - path)){
-        memcpy(buffer, path, write_p - path);
-    } else {
-        write_p = path;
-    }
-    
-#if FRED_INTERNAL
-    if(len != (write_p - path) || memcmp(filename, path, len) != 0){
-        LINUX_FN_DEBUG("[%.*s] -> [%.*s]", len, filename, (int)(write_p - path), path);
-    }
-#endif
-    
-    u32 length = (i32)(write_p - path);
-    buffer[length] = 0;
-    return(length);
-}
-
-internal
-Sys_Load_Handle_Sig(system_load_handle){
-    b32 result = 0;
-    
-    int fd = open(filename, O_RDONLY);
-    if(fd == -1){
-        perror("open");
-    } else {
-        *(int*)handle_out = fd;
-        result = 1;
-    }
-    
-    return result;
-}
-
-internal
-Sys_Load_Size_Sig(system_load_size){
-    u32 result = 0;
-    
-    int fd = *(int*)&handle;
-    struct stat st;
-    
-    if(fstat(fd, &st) == -1){
-        perror("fstat");
-    } else {
-        result = st.st_size;
-    }
-    
-    return result;
-}
-
-internal
-Sys_Load_File_Sig(system_load_file){
-    
-    int fd = *(int*)&handle;
-    do {
-        ssize_t n = read(fd, buffer, size);
-        if(n == -1){
-            if(errno != EINTR){
-                perror("read");
-                break;
-            }
-        } else {
-            size -= n;
-            buffer += n;
-        }
-    } while(size);
-    
-    return size == 0;
-}
-
-internal
-Sys_Load_Close_Sig(system_load_close){
-    b32 result = 1;
-    
-    int fd = *(int*)&handle;
-    if(close(fd) == -1){
-        perror("close");
-        result = 0;
-    }
-    
-    return result;
-}
-
-internal
-Sys_Save_File_Sig(system_save_file){
-    int fd = open(filename, O_WRONLY | O_TRUNC | O_CREAT, 00640);
-    LINUX_FN_DEBUG("%s %d", filename, size);
-    if(fd < 0){
-        fprintf(stderr, "system_save_file: open '%s': %s\n", filename, strerror(errno));
-    }
-    else{
-        do {
-            ssize_t written = write(fd, buffer, size);
-            if(written == -1){
-                if(errno != EINTR){
-                    perror("system_save_file: write");
-                    break;
-                }
-            } else {
-                size -= written;
-                buffer += written;
-            }
-        } while(size);
-        close(fd);
-    }
-    
-    return (size == 0);
-}
-
 //
 // Time
 //
diff --git a/platform_mac/mac_4ed.cpp b/platform_mac/mac_4ed.cpp
index ef108657..8c90e5df 100644
--- a/platform_mac/mac_4ed.cpp
+++ b/platform_mac/mac_4ed.cpp
@@ -46,14 +46,11 @@
 #include "unix_4ed_functions.cpp"
 
 #include "osx_objective_c_to_cpp_links.h"
-
 OSX_Vars osx;
 
-// TODO(allen): Implement a real allocate
-#include <stdlib.h>
 external void*
 osx_allocate(umem size){
-    void *result = malloc(size);
+    void *result = system_memory_allocate(size);
     return(result);
 }
 
diff --git a/platform_unix/unix_4ed_functions.cpp b/platform_unix/unix_4ed_functions.cpp
index c05c72c1..847abc37 100644
--- a/platform_unix/unix_4ed_functions.cpp
+++ b/platform_unix/unix_4ed_functions.cpp
@@ -13,9 +13,12 @@
 
 #include <sys/types.h>
 #include <sys/stat.h>
-#include <fcntl.h>
 
+#include <fcntl.h>
 #include <unistd.h>
+#include <dirent.h>
+#include <alloca.h>
+#include <errno.h>
 
 #if defined(USE_LOG)
 # include <stdio.h>
@@ -131,5 +134,253 @@ Sys_Memory_Free_Sig(system_memory_free){
     munmap(ptr, size);
 }
 
+//
+// Files
+//
+
+internal
+Sys_Set_File_List_Sig(system_set_file_list){
+    DIR *d;
+    struct dirent *entry;
+    char *fname, *cursor, *cursor_start;
+    File_Info *info_ptr;
+    i32 character_count, file_count, size, required_size, length;
+    b32 clear_list = false;
+    
+    if(directory == 0){
+        system_memory_free(file_list->block, file_list->block_size);
+        file_list->block = 0;
+        file_list->block_size = 0;
+        file_list->infos = 0;
+        file_list->count = 0;
+        return;
+    }
+    
+    LOGF("%s", directory);
+    
+    d = opendir(directory);
+    if (d){
+        if (canon_directory_out != 0){
+            u32 length = copy_fast_unsafe_cc(canon_directory_out, directory);
+            if (canon_directory_out[length-1] != '/'){
+                canon_directory_out[length++] = '/';
+            }
+            canon_directory_out[length] = 0;
+            *canon_directory_size_out = length;
+        }
+        
+        character_count = 0;
+        file_count = 0;
+        for (entry = readdir(d);
+             entry != 0;
+             entry = readdir(d)){
+            fname = entry->d_name;
+            if (match_cc(fname, ".") || match_cc(fname, "..")){
+                continue;
+            }
+            ++file_count;            
+            for (size = 0; fname[size]; ++size);
+            character_count += size + 1;
+        }
+        
+        required_size = character_count + file_count * sizeof(File_Info);
+        if (file_list->block_size < required_size){
+            system_memory_free(file_list->block, file_list->block_size);
+            file_list->block = system_memory_allocate(required_size);
+            file_list->block_size = required_size;
+        }
+        
+        file_list->infos = (File_Info*)file_list->block;
+        cursor = (char*)(file_list->infos + file_count);
+        
+        if (file_list->block != 0){
+            rewinddir(d);
+            info_ptr = file_list->infos;
+            for (entry = readdir(d);
+                 entry != 0;
+                 entry = readdir(d)){
+                fname = entry->d_name;
+                if (match_cc(fname, ".") || match_cc(fname, "..")){
+                    continue;
+                }
+                cursor_start = cursor;
+                length = copy_fast_unsafe_cc(cursor_start, fname);
+                cursor += length;
+                
+                if(entry->d_type == DT_LNK){
+                    struct stat st;
+                    if(stat(entry->d_name, &st) != -1){
+                        info_ptr->folder = S_ISDIR(st.st_mode);
+                    } else {
+                        info_ptr->folder = 0;
+                    }
+                } else {
+                    info_ptr->folder = (entry->d_type == DT_DIR);
+                }
+                
+                info_ptr->filename = cursor_start;
+                info_ptr->filename_len = length;
+                *cursor++ = 0;
+                ++info_ptr;
+            }
+        }
+        
+        file_list->count = file_count;
+        
+        closedir(d);
+    } else {
+        system_memory_free(file_list->block, file_list->block_size);
+        file_list->block = 0;
+        file_list->block_size = 0;
+        file_list->infos = 0;
+        file_list->count = 0;
+    }
+}
+
+internal
+Sys_Get_Canonical_Sig(system_get_canonical){
+    char* path = (char*) alloca(len + 1);
+    char* write_p = path;
+    const char* read_p = filename;
+    
+    // return 0 for relative paths (e.g. cmdline args)
+    if(len > 0 && filename[0] != '/'){
+        return 0;
+    }
+    
+    if (max == 0){
+        return 0;
+    }
+    
+    max -= 1;
+    
+    while(read_p < filename + len){
+        if(read_p == filename || read_p[0] == '/'){
+            if(read_p[1] == '/'){
+                ++read_p;
+            } else if(read_p[1] == '.'){
+                if(read_p[2] == '/' || !read_p[2]){
+                    read_p += 2;
+                } else if(read_p[2] == '.' && (read_p[3] == '/' || !read_p[3])){
+                    while(write_p > path && *--write_p != '/');
+                    read_p += 3;
+                } else {
+                    *write_p++ = *read_p++;
+                }
+            } else {
+                *write_p++ = *read_p++;
+            }
+        } else {
+            *write_p++ = *read_p++;
+        }
+    }
+    if(write_p == path) *write_p++ = '/';
+    
+    if(max >= (write_p - path)){
+        memcpy(buffer, path, write_p - path);
+    } else {
+        write_p = path;
+    }
+    
+#if FRED_INTERNAL
+    if(len != (write_p - path) || memcmp(filename, path, len) != 0){
+        LOGF("[%.*s] -> [%.*s]", len, filename, (int)(write_p - path), path);
+    }
+#endif
+    
+    u32 length = (i32)(write_p - path);
+    buffer[length] = 0;
+    return(length);
+}
+
+internal
+Sys_Load_Handle_Sig(system_load_handle){
+    b32 result = 0;
+    
+    int fd = open(filename, O_RDONLY);
+    if(fd == -1){
+        LOG("open");
+    } else {
+        *(int*)handle_out = fd;
+        result = 1;
+    }
+    
+    return result;
+}
+
+internal
+Sys_Load_Size_Sig(system_load_size){
+    u32 result = 0;
+    
+    int fd = *(int*)&handle;
+    struct stat st;
+    
+    if(fstat(fd, &st) == -1){
+        LOG("fstat");
+    } else {
+        result = st.st_size;
+    }
+    
+    return result;
+}
+
+internal
+Sys_Load_File_Sig(system_load_file){
+    int fd = *(int*)&handle;
+    do {
+        ssize_t n = read(fd, buffer, size);
+        if(n == -1){
+            if(errno != EINTR){
+                LOG("read");
+                break;
+            }
+        } else {
+            size -= n;
+            buffer += n;
+        }
+    } while(size);
+    
+    return size == 0;
+}
+
+internal
+Sys_Load_Close_Sig(system_load_close){
+    b32 result = 1;
+    
+    int fd = *(int*)&handle;
+    if(close(fd) == -1){
+        LOG("close");
+        result = 0;
+    }
+    
+    return result;
+}
+
+internal
+Sys_Save_File_Sig(system_save_file){
+    int fd = open(filename, O_WRONLY | O_TRUNC | O_CREAT, 00640);
+    LOGF("%s %d", filename, size);
+    if(fd < 0){
+        LOGF("system_save_file: open '%s': %s\n", filename, strerror(errno));
+    }
+    else{
+        do {
+            ssize_t written = write(fd, buffer, size);
+            if(written == -1){
+                if(errno != EINTR){
+                    LOG("system_save_file: write");
+                    break;
+                }
+            } else {
+                size -= written;
+                buffer += written;
+            }
+        } while(size);
+        close(fd);
+    }
+    
+    return (size == 0);
+}
+
 // BOTTOM