Pytanie głównie do perlowców

[Arkadiusz Miśkiewicz]

Mam w pewnym programiku (sucku) coś takiego:

       if((master->perl_int = perl_alloc()) == NULL) {
....
                perl_construct(master->perl_int);
....
                if(perl_parse(master->perl_int, NULL, 2, prgs, NULL) == 0) {
....
                        perl_run(master->perl_int);
....
dotąd IMHO jest ok ale :

                if(master->perl_int == NULL) {
//				    ^^ czy tu przypadkiem nie powinno być != ?
//				    jak jest == to zrzuca core :)))
				killperl_done(master);
					      }

gdzie
void killperl_done(PKillStruct master) {
        perl_destruct(master->perl_int);
//	^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
        perl_free(master->perl_int);
        master->perl_int = NULL;
        master->killfunc=chk_msg_kill; /* restore
	default function */
}
				

-- 
  +- Arkadiusz Miśkiewicz - Cron w irc.pl on #plug - misiek w misiek.eu.org -+
  + http://www.misiek.eu.org --- Poland --- SysAdm: zsz2.starachowice.pl +
  + Polish Linux Distribution Team Member - http://www.shadow.eu.org/PLD +

-------------- następna część ---------
Załącznik, który nie był tekstem został usunięty...
Name: nie znany
Type: application/pgp-signature
Size: 248 bytes
Desc: nie znany
Url : /mailman/pipermail/pld-devel-pl/attachments/19981209/13d75748/attachment.bin