diff options
Diffstat (limited to 'lisp/cedet/semantic/bovine/c.el')
| -rw-r--r-- | lisp/cedet/semantic/bovine/c.el | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lisp/cedet/semantic/bovine/c.el b/lisp/cedet/semantic/bovine/c.el index e9715cc1bb0..9aceca8af1b 100644 --- a/lisp/cedet/semantic/bovine/c.el +++ b/lisp/cedet/semantic/bovine/c.el @@ -270,7 +270,7 @@ Return the defined symbol as a special spp lex token." (if (looking-back "/\\*.*" beginning-of-define) (progn (goto-char (match-beginning 0)) - (1- (point))) + (point)) (point))))) ) @@ -501,7 +501,13 @@ code to parse." (hif-canonicalize) (error nil)))) - (let ((eval-form (eval parsedtokelist))) + (let ((eval-form (condition-case err + (eval parsedtokelist) + (error + (semantic-push-parser-warning + (format "Hideif forms produced an error. Assuming false.\n%S" err) + (point) (1+ (point))) + nil)))) (if (or (not eval-form) (and (numberp eval-form) (equal eval-form 0)));; ifdef line resulted in false |