Mercurial > hg > xemacs-beta
comparison src/specifier.c @ 5420:b9167d522a9a
Rebase with 21.5 trunk.
author | Mats Lidell <matsl@xemacs.org> |
---|---|
date | Thu, 28 Oct 2010 23:53:24 +0200 |
parents | 308d34e9f07d d185fa593d5f |
children | d12a0c55b174 |
comparison
equal
deleted
inserted
replaced
5419:eaf01113cd42 | 5420:b9167d522a9a |
---|---|
2822 } | 2822 } |
2823 | 2823 |
2824 if (HAS_SPECMETH_P (sp, instantiate)) | 2824 if (HAS_SPECMETH_P (sp, instantiate)) |
2825 val = call_with_suspended_errors | 2825 val = call_with_suspended_errors |
2826 ((lisp_fn_t) RAW_SPECMETH (sp, instantiate), | 2826 ((lisp_fn_t) RAW_SPECMETH (sp, instantiate), |
2827 Qunbound, Qspecifier, errb, 5, specifier, | 2827 Qunbound, Qspecifier, ERROR_ME_WARN, 5, specifier, |
2828 matchspec, domain, val, depth, no_fallback); | 2828 matchspec, domain, val, depth, no_fallback); |
2829 | 2829 |
2830 if (!UNBOUNDP (val)) | 2830 if (!UNBOUNDP (val)) |
2831 { | 2831 { |
2832 unbind_to (count); | 2832 unbind_to (count); |