From: Daniel Barlow <dan@telent.net>
Date: Wed, 2 Apr 2003 13:50:00 +0000 (+0000)
Subject: new
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=1a1d692a866789059c6ea4798484ea90a1723d2e;p=sbcl.git

new
---

diff --git a/src/code/late-symbol.lisp b/src/code/late-symbol.lisp
new file mode 100644
index 0000000..788bab3
--- /dev/null
+++ b/src/code/late-symbol.lisp
@@ -0,0 +1,18 @@
+;;;; more code to manipulate symbols
+;;;;
+;;;; Many of these definitions are trivial interpreter entries to
+;;;; functions open-coded by the compiler.
+
+;;;; This software is part of the SBCL system. See the README file for
+;;;; more information.
+;;;;
+;;;; This software is derived from the CMU CL system, which was
+;;;; written at Carnegie Mellon University and released into the
+;;;; public domain. The software is in the public domain and is
+;;;; provided with absolutely no warranty. See the COPYING and CREDITS
+;;;; files for more information.
+
+(in-package "SB!IMPL")
+
+(defun %set-symbol-value (symbol new-value)
+  (%primitive set symbol new-value))