diff options
author | Eduardo Julian | 2017-03-21 19:07:47 -0400 |
---|---|---|
committer | Eduardo Julian | 2017-03-21 19:07:47 -0400 |
commit | 57d7b77d354338da57646f8b28eaccee4a7d2525 (patch) | |
tree | 703bcdf934a913a0f966732376d4ff7858f6b58c | |
parent | 50584a0acfb8272a4bc9a6e64ba964be141ebded (diff) |
- Fixed a bug when hashing the module files when loading the cache.
-rw-r--r-- | luxc/src/lux/compiler/cache.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/luxc/src/lux/compiler/cache.clj b/luxc/src/lux/compiler/cache.clj index 91aa8802b..c51691322 100644 --- a/luxc/src/lux/compiler/cache.clj +++ b/luxc/src/lux/compiler/cache.clj @@ -123,7 +123,7 @@ (&/|map #(.split ^String % &&core/datum-separator 2) imports))] cache-table* (&/fold% (fn [cache-table* _import] (|do [:let [[_module _hash] _import] - file-content (&&io/read-file source-dirs _module) + [file-name file-content] (&&io/read-file source-dirs _module) output (pre-load! source-dirs cache-table* _module (hash file-content) load-def-value install-all-defs-in-module uninstall-all-defs-in-module)] (return output))) @@ -204,7 +204,7 @@ (&/$Left error) (return* _compiler cache-table) - (&/$Right _compiler* file-content) + (&/$Right _compiler* [file-name file-content]) ((pre-load! source-dirs cache-table module-name (hash file-content) load-def-value install-all-defs-in-module uninstall-all-defs-in-module) _compiler*)))) |