Fix Perl_swash_init & Perl_swash_fetch to save ERRSV (= $@)
authorJarkko Hietaniemi <jhi@iki.fi>
Tue, 29 May 2001 16:25:47 +0000 (16:25 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Tue, 29 May 2001 16:25:47 +0000 (16:25 +0000)
commitf8be5cf0389ae62d00662435c7a6a3adad70afa4
treeca1fb06cb910a55e0835dd719449b59337b0dfa0
parentffc4a5af7ac7c7f46decfea748606a2d9298dd7e
Fix Perl_swash_init & Perl_swash_fetch to save ERRSV (= $@)
before Perl_load_module/Perl_call_method and restore the value
after if !SvTRUE(ERRSV).  (from Inaba Hiroto)

p4raw-id: //depot/perl@10297
utf8.c