Index: /trunk/source/compiler/nx-basic.lisp
===================================================================
--- /trunk/source/compiler/nx-basic.lisp	(revision 14702)
+++ /trunk/source/compiler/nx-basic.lisp	(revision 14703)
@@ -596,4 +596,6 @@
                  (eq (cadr decl) 'inline))
         (return-from nx-declared-inline-p (eq (cddr decl) 'inline))))
+    (when (assq sym (lexenv.functions env))
+      (return nil))
     (setq env (lexenv.parent-env env))))
 
Index: /trunk/source/compiler/nx0.lisp
===================================================================
--- /trunk/source/compiler/nx0.lisp	(revision 14702)
+++ /trunk/source/compiler/nx0.lisp	(revision 14703)
@@ -1934,4 +1934,6 @@
                  (eq (cadr decl) 'inline))
          (return-from nx-declared-notinline-p (eq (cddr decl) 'notinline))))
+    (when (assq sym (lexenv.functions env))
+      (return nil))
     (setq env (lexenv.parent-env env))))