From ebc8418fefd4ab5f3c89da209ef903a64ffa0484 Mon Sep 17 00:00:00 2001 From: Eric Ludlam Date: Wed, 26 Nov 2014 10:37:28 -0500 Subject: [PATCH] semantic: Check if slot is bound * lisp/cedet/semantic/analyze.el (semantic-analyze-show): Protect against unbound error slot. --- lisp/cedet/semantic/analyze.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/cedet/semantic/analyze.el b/lisp/cedet/semantic/analyze.el index a8cd95d6793..70a5bad97c5 100644 --- a/lisp/cedet/semantic/analyze.el +++ b/lisp/cedet/semantic/analyze.el @@ -804,7 +804,8 @@ Use BUFF as a source of override methods." (semantic-analyze-princ-sequence (oref context prefix) "Prefix: " ) (semantic-analyze-princ-sequence (oref context prefixclass) "Prefix Classes: ") (semantic-analyze-princ-sequence (oref context prefixtypes) "Prefix Types: ") - (semantic-analyze-princ-sequence (oref context errors) "Encountered Errors: ") + (semantic-analyze-princ-sequence (when (slot-boundp context 'errors) (oref context errors)) + "Encountered Errors: ") (princ "--------\n") ;(semantic-analyze-princ-sequence (oref context scopetypes) "Scope Types: ") ;(semantic-analyze-princ-sequence (oref context scope) "Scope: ") -- 2.39.5