Skip to content

Commit

Permalink
Fix package nickname coercion
Browse files Browse the repository at this point in the history
  • Loading branch information
Bike committed Jun 24, 2024
1 parent 1a63515 commit fcfd70b
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/core/lisp.cc
Original file line number Diff line number Diff line change
Expand Up @@ -941,7 +941,7 @@ Package_sp Lisp::makePackage(SimpleString_sp name, List_sp nicknames, List_sp us
this->_Roots._Packages.push_back(newPackage);
}
// Assign nicknames.
for (auto nc : nicknames) {
for (auto nc : cnicknames) {
this->_Roots._PackageNameIndexMap->setf_gethash(oCar(nc), packageIndex);
}
newPackage->setNicknames(cnicknames);
Expand Down

0 comments on commit fcfd70b

Please sign in to comment.