Namazu-devel-ja(旧)

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

(codeconv.pl) LANG=ja, perl -d:DProf で中身が処理されない

>                                            千葉市中央区長洲
>                                                    藤原  誠
で実は、僕のところでは、perl -d:DProf した時に、NMZ.w の中
に譜名だけが書かれて、実質空っぽという問題がまだ残っていて、
とりあえず、添付のような変更をすると、何とか動くようになると
いうことが分りました。

(しかしこれでは memory leak でしょうか)。my だから大丈夫 ?

---
(藤原)
Index: pl/codeconv.pl
===================================================================
RCS file: /storage/cvsroot/namazu/pl/codeconv.pl,v
retrieving revision 1.11.8.3
diff -u -r1.11.8.3 codeconv.pl
--- pl/codeconv.pl	9 Jul 2003 15:19:33 -0000	1.11.8.3
+++ pl/codeconv.pl	29 Jul 2003 10:11:40 -0000
@@ -134,7 +134,8 @@
 	my $nkf_opt = "-emXZ1";
 
 	if ($var::USE_NKF_MODULE) {
-	    $$contref = NKF::nkf($nkf_opt, $$contref);
+	    my @result = NKF::nkf($nkf_opt, $$contref);
+	    $contref = \@result;    # fix for the problem at perl -d:DProf
 	} else {
 	    my $nkftmp = util::tmpnam("NMZ.nkf");
 	    {