From 7a2da0845513ca0e46981e4f0e0af05b3d94fd62 Mon Sep 17 00:00:00 2001 From: FelixBrendel Date: Fri, 6 Dec 2019 11:45:34 +0100 Subject: [PATCH] small adjustmewnts --- src/built_ins.cpp | 2 +- src/env.cpp | 1 - src/libslime.cpp | 13 +++++-------- 3 files changed, 6 insertions(+), 10 deletions(-) diff --git a/src/built_ins.cpp b/src/built_ins.cpp index 30cf613..6e9e950 100644 --- a/src/built_ins.cpp +++ b/src/built_ins.cpp @@ -45,7 +45,7 @@ namespace Slime { load_path.append((void*)path); } - + proc built_in_load(String* file_name) -> Lisp_Object* { profile_with_comment(&file_name->data); char* file_content; diff --git a/src/env.cpp b/src/env.cpp index bcfd1c1..ba990ed 100644 --- a/src/env.cpp +++ b/src/env.cpp @@ -1,5 +1,4 @@ namespace Slime { - proc define_symbol(Lisp_Object* symbol, Lisp_Object* value) -> void { profile_with_comment(&symbol->value.symbol->data); Environment* env = get_current_environment(); diff --git a/src/libslime.cpp b/src/libslime.cpp index 9b07a0e..604cbc9 100644 --- a/src/libslime.cpp +++ b/src/libslime.cpp @@ -20,12 +20,6 @@ # include #endif -#include "ftb/types.hpp" -#include "ftb/arraylist.hpp" -#include "ftb/bucket_allocator.hpp" -#include "ftb/macros.hpp" -#include "ftb/profiler.hpp" - /* Forward declare the hash functions for the hashmap (needed at least for clang++) @@ -38,7 +32,11 @@ unsigned int hm_hash(char* str); unsigned int hm_hash(void* ptr); unsigned int hm_hash(Slime::Lisp_Object* obj); #include "ftb/hashmap.hpp" - +#include "ftb/types.hpp" +#include "ftb/arraylist.hpp" +#include "ftb/bucket_allocator.hpp" +#include "ftb/macros.hpp" +#include "ftb/profiler.hpp" # include "defines.cpp" # include "assert.hpp" @@ -121,4 +119,3 @@ unsigned int hm_hash(Slime::Lisp_Object* obj) { # include "built_ins.cpp" # include "testing.cpp" // # include "undefines.cpp" -