summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2021-07-02 00:25:58 -0700
committerKaz Kylheku <kaz@kylheku.com>2021-07-02 00:25:58 -0700
commit6eee79c228000779c1b0eab5e67073ad1be83516 (patch)
treee5d57a9301fad61335489930d378d3f9c3804061
parentf498c4387b0faccae9d7085b568f0db58c663760 (diff)
downloadtxr-6eee79c228000779c1b0eab5e67073ad1be83516.tar.gz
txr-6eee79c228000779c1b0eab5e67073ad1be83516.tar.bz2
txr-6eee79c228000779c1b0eab5e67073ad1be83516.zip
packages: find-symbol behaving like find-symbol-fb.
* lib.c (find_symbol): This function is identical to find_symbol_fb. The code for searching the fallback list must be removed.
-rw-r--r--lib.c11
1 files changed, 0 insertions, 11 deletions
diff --git a/lib.c b/lib.c
index 3d168bf4..dff01c5a 100644
--- a/lib.c
+++ b/lib.c
@@ -6640,17 +6640,6 @@ val find_symbol(val name, val package_in, val notfound_val_in)
return cdr(cell);
}
- {
- val fallback = get_hash_userdata(package->pk.symhash);
-
- for (; fallback; fallback = cdr(fallback)) {
- val fb_pkg = car(fallback);
- val cell = gethash_e(self, fb_pkg->pk.symhash, name);
- if (cell)
- return cdr(cell);
- }
- }
-
return default_null_arg(notfound_val_in);
}