|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 07 May 2001 15:16:14
To : smb@mh.vstu.edu.ru
Subject : Re: Attempt to free non-existent shared string
--------------------------------------------------------------------------------
Здравствуй, Michael Smirnov.
В твоём письме от Mon, 7 May 2001 08:38:53 +0000 (UTC) написано:
smver> Имеется скрипт, работающий с СУБД Firebird через модуль IBPerl 0.8p3.
smver> Скрипт успешно добавляет запись в таблицу, но всегда вылезает это:
smver> Attempt to free non-existent shared string, <STDIN> chunk 5.
smver> Хоть бы сказал, в какой строке!
smver> Однако, если закомментировать строчки
smver> if ($st->execute("$info[0]",$startdatestr,$stopdatestr) != 0)
smver> {die "Line ".__LINE__." Statement Error:\n$st->{'Error'}\n"}
smver> то сообщение не появляется!
smver> Самый прикол, глюк вылезает явно после конца работы скрипта
smver> (строки, которая выводит "ok!"):
smver> -------------------------
smver> ok!
smver> Attempt to free non-existent shared string, <STDIN> chunk 5.
smver> -------------------------
Кстати, это еще не аргумент. Или ok! у тебя тоже в STDERR вываливается?
smver> Что перлу не нравится-то?
smver> FreeBSD 4.2, Perl 5.005_03.
Где-то в коде идет попытка сделать вышеописанную операцию. Баг там.
--
Artem Chuprina E-mail: ran@ran.pp.ru
Programmer FIDO: 2:5020/371.32
Memonet Ltd. Phone: +7-095-284-1356
--- ifmail v.2.15dev5
* Origin: NTV Internet (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Attempt to free non-existent shared string 