From 9b0b7af93e7ae2a6094acb12b812381e32e65762 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 8 Oct 2015 22:04:13 -0400
Subject: [PATCH] Bugfix, extract string using the proper helper, not the
 symbol one

---
 runtime.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/runtime.c b/runtime.c
index d5ffa156..c1d2fcd7 100644
--- a/runtime.c
+++ b/runtime.c
@@ -868,9 +868,9 @@ string_type Cyc_symbol2string(object sym) {
 object Cyc_string2symbol(object str) {
     object sym;
     Cyc_check_str(str);
-    sym = find_symbol_by_name(symbol_pname(str));
+    sym = find_symbol_by_name(string_str(str));
     if (!sym) {
-        sym = add_symbol_by_name(symbol_pname(str));
+        sym = add_symbol_by_name(string_str(str));
     }
     return sym;
 }