From 7260bfddd931cafa1a243743dbad3e1b4f20fc9d Mon Sep 17 00:00:00 2001
From: Daniel Kochmanski <daniel@turtleware.eu>
Date: Mon, 1 May 2017 18:27:53 +0200
Subject: [PATCH] cosmetic: keep convention from other places

---
 src/c/package.d | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/c/package.d b/src/c/package.d
index 523ead410..9cae279c2 100644
--- a/src/c/package.d
+++ b/src/c/package.d
@@ -939,7 +939,8 @@ cl_package_used_by_list(cl_object p)
 cl_object
 cl_package_shadowing_symbols(cl_object p)
 {
-  return cl_copy_list(si_coerce_to_package(p)->pack.shadowings);
+  p = si_coerce_to_package(p);
+  return cl_copy_list(p->pack.shadowings);
 }
 
 cl_object