MaxSpecpdlSize

← バグレポート (2005-04-18 21:17:43)

• 2005-04-10 (日) 11:57:49 taku : 2chからの転記です。http://pc8.2ch.net/test/read.cgi/unix/1077881095/638　make testは、howm: test050402 (compile: t, make: t, test: t)です。
  • 2005-04-11 (月) 16:34:11 taku : test.batやってみました。Debugger entered--Lisp error: (error "Variable binding depth exceeds max-specpdl-size")~ というのが出ています。
  • 2005-04-11 (月) 16:47:59 taku : limitsというパッケージをuninstallしたら、test.batは通るようになりました。しかし、相変わらずコンパイルエラーは出ます。。
  • 2005-04-11 (月) 21:54:34 名無しさん : cygwin 環境が用意できなくて追試できないです…. どなたか, taku さんと同じことをして発症するか確認いただけないでしょうか? > win な方
  • 2005-04-11 (月) 21:55:04 名無しさん : 逆に, 最近のテスト版でコンパイルに成功した方も, make test で表示されるバージョン一式を貼っていただけると助かります(win に限らず). ここでも2ch2:l50でも結構です. お願いします.
  • 2005-04-15 (金) 00:36:57 taku : howm-1.2.2rc1をCygwinでコンパイルしてみました。

Wrote d:/usr/local/src/howm-1.2.2rc1/howm-common.elc
Wrote d:/usr/local/src/howm-1.2.2rc1/howm-version.elc
Wrote d:/usr/local/src/howm-1.2.2rc1/action-lock.elc
Wrote d:/usr/local/src/howm-1.2.2rc1/riffle.elc
Wrote d:/usr/local/src/howm-1.2.2rc1/gfunc.elc
Wrote d:/usr/local/src/howm-1.2.2rc1/illusion.elc
Wrote d:/usr/local/src/howm-1.2.2rc1/cheat-font-lock.elc
Done
make[3]: *** [recompile] エラー 1
make[3]: Leaving directory `/usr/local/src/howm-1.2.2rc1'
make[2]: *** [action-lock.elc] エラー 2
make[2]: Leaving directory `/usr/local/src/howm-1.2.2rc1'
make[1]: *** [all-recursive] エラー 1
make[1]: Leaving directory `/usr/local/src/howm-1.2.2rc1'
make: *** [all] エラー 2

やはり同じ現象です。うーん、他にCygwin & Meadow2で使っている人はいないのでしょうか。。

• • 2005-04-15 (金) 00:58:41 名無しさん : MakeErrorLog ← ここにでも, 略さない丸ごとのログを貼ってみていただけませんか? 「make -d」じゃなく, ひとまず「make」だけで
  • 2005-04-15 (金) 01:03:16 名無しさん : フォーマットの崩れとか気にせず, べた貼りで OK です. ソース読みますから.
  • 2005-04-15 (金) 23:19:29 taku : 今張りました。お手数をお掛けしますm(_ _)m。
  • 2005-04-16 (土) 00:13:27 名無しさん : emacs -q で起動して, M-x describe-variable max-specpdl-size の一行目はどうなってるでしょう?
  • 2005-04-16 (土) 17:14:59 taku : 600になっています。これが原因でしょうか。
  • 2005-04-16 (土) 23:34:06 名無しさん : うーん, 手元でも 600 で同じです. だめもとで… elisp-comp の最後の方, EOF とだけ書いてある行の直前に (setq max-specpdl-size 2400) とか一行書き加えてみたらどうなるでしょうか?
  • 2005-04-18 (月) 17:23:11 taku : うーん、elisp-compのファイル末尾に設定しても駄目みたいです。このelisp-compを使わないでmakeする方法ってありますか？もしくは手動でコンパイル→インストールでもいいんですが。

• 2005-04-18 (月) 21:33:24 名無しさん : make clean して make test して, 起動した emacs 上で C-u 0 M-x byte-recompile-directory RET RET …の結果をまた MakeErrorLog にでも追加していただければ助かります.
• 2005-04-20 (水) 12:55:10 taku : MakeErrorLogのEOFから追記しました。お手数をお掛けして申し訳ありません。
• 2005-04-20 (水) 22:10:39 名無しさん : bcomp.el までこけますか. 一度も手を入れてないのに…. 面妖ですねえ.
• 2005-04-20 (水) 22:10:57 名無しさん : お手数ですけれど, 「meadow が変」じゃなくて「howm が変」なのかどうか, まず切り分けていただけないでしょうか. 別のパッケージ(たとえば navi2ch とか)は, ちゃんとバイトコンパイルできてます?
• 2005-04-20 (水) 22:11:42 名無しさん : で, howm の問題だったら, http://howm.sourceforge.jp/a/ にある過去の版をそれぞれ make してみて, どの版まで OK でどの版からこけるかがわかると, ヒントになるかもしれません. howm-1.2 → howm-1.2.1 → howm-test041224 → howm-test050109
• 2005-04-21 (木) 12:50:18 taku : 試してみました。1.2.1〜test050109まではＯＫで、1.2.2rc1からＮＧになりました。
• 2005-04-21 (木) 20:55:45 taku : ちなみに、navi2ch, riece, wanderlust, cedet, jde等は問題なくコンパイル出来ています。
• 2005-04-21 (木) 22:29:55 名無しさん : 050214, 050223, 050303, 050402 も置きました. お手数ですがまた確認をお願いできるでしょうか.
• 2005-04-22 (金) 01:08:25 名無しさん : あ, 念のため: 2005-04-18 の elisp-comp うんぬんは, 「ファイル末尾」じゃなくて, 「エディタが表示する EOF マーク」でもなくて, 「EOF という文字列が書かれている行の直前」という意味ですけど, だいじょうぶですよね ^^;
• 2005-04-22 (金) 12:49:15 taku : ファイル末尾に追記したという意味です、すみません。
• 2005-04-23 (土) 11:33:07 も : 遅ればせながら参加です。Meadow 2.10, howm-1.2.2rc2 ですと taku さんと同じく howm.el のバイトコンパイルのところで max-specpdl-size のエラーでこけます。前から気づいていたのですが、byte-compile せずに使ってごまかしてました。elisp-comp の EOF 行前に max-specpdl-size の値を増やす設定を入れたらコンパイルできるようになりました。値は 617 で十分なようです。make test で表示される emacs バージョンは Meadow 2.10 (ASAGAO), 21.4.1 (i386-mingw-nt5.0.2195) of 2005-03-18 です。あと、何か調べましょうか？
• 2005-04-23 (土) 12:33:49 も : 上記でコンパイルは通りましたが、実行時にも max-specpdl-size を増やしておかないとこけます。meadow --debug-init として調べたところ、こけるのは (image-file-name-regexp) の中です。システム組み込みの image-file-name-regexp の代わりに howm-common.el に記載されているものを使うようにしたところ max-specpdl-size を増やさなくてもコンパイル・実行共にうまくいきました。Meadow 2.10 付属のものは以下のとおりです。

Meadow 2.10 の image-file-name-regexp

(defun image-file-name-regexp ()
  "Return a regular expression matching image-file filenames."
  (let ((exts-regexp
	 (and image-file-name-extensions
	      (concat "\\."
		      (regexp-opt (nconc (mapcar #'upcase
						 image-file-name-extensions)
					 image-file-name-extensions)
				  t)
		      "\\'"))))
    (if image-file-name-regexps
	(mapconcat 'identity
		   (if exts-regexp
		       (cons exts-regexp image-file-name-regexps)
		     image-file-name-regexps)
		   "\\|")
      exts-regexp)))

ついでに、こけたときのダンプ (トップだけ)

Debugger entered--Lisp error: (error "Variable binding depth exceeds max-specpdl-size")
  regexp-opt-group(("I" "S" "SF" "SI" "T" "T2" "T3") t t)
  regexp-opt-group(("PI" "PS" "PSF" "PSI" "PT" "PT2" "PT3"))
  regexp-opt-group(("MF" "PI" "PS" "PSF" "PSI" "PT" "PT2" "PT3") t t)
  regexp-opt-group(("EMF" "EPI" "EPS" "EPSF" "EPSI" "EPT" "EPT2" "EPT3"))
  regexp-opt-group(("EMF" "EPI" "EPS" "EPSF" "EPSI" "EPT" "EPT2" "EPT3" "FAX" "FITS" "FPX" "G3" "GIF" "GIF87"
   "HDF" "JNG" "JP2" "JPC" "JPEG" "JPG" "M2V" "MIFF" "MNG" "MPC" "MPEG" "MPG" "MVG" "PBM" "PCD" "PCL" "PCT"
   "PCX" "PDB" "PDF" "PFA" "PFB" "PGM" "PGX" "PICT" "PNG" "PNG24" "PNG32" "PNG8" "PNM" "PPM" "PSD" "PWP" "RAS"
    "RLE" "SCT" ...))
  regexp-opt-group(("DCM" "DCX" "DPX" "EMF" "EPI" "EPS" "EPSF" "EPSI" "EPT" "EPT2" "EPT3" "FAX" "FITS" "FPX"
   "G3" "GIF" "GIF87" "HDF" "JNG" "JP2" "JPC" "JPEG" "JPG" "M2V" "MIFF" "MNG" "MPC" "MPEG" "MPG" "MVG" "PBM"
   "PCD" "PCL" "PCT" "PCX" "PDB" "PDF" "PFA" "PFB" "PGM" "PGX" "PICT" "PNG" "PNG24" "PNG32" "PNG8" "PNM" "PPM"
   "PSD" "PWP" ...))
  regexp-opt-group(("CIN" "DCM" "DCX" "DPX" "EMF" "EPI" "EPS" "EPSF" "EPSI" "EPT" "EPT2" "EPT3" "FAX" "FITS"
   "FPX" "G3" "GIF" "GIF87" "HDF" "JNG" "JP2" "JPC" "JPEG" "JPG" "M2V" "MIFF" "MNG" "MPC" "MPEG" "MPG" "MVG"
   "PBM" "PCD" "PCL" "PCT" "PCX" "PDB" "PDF" "PFA" "PFB" "PGM" "PGX" "PICT" "PNG" "PNG24" "PNG32" "PNG8" "PNM"
   "PPM" "PSD" ...))
  regexp-opt-group(("BMP" "BMP2" "BMP3" "CIN" "DCM" "DCX" "DPX" "EMF" "EPI" "EPS" "EPSF" "EPSI" "EPT" "EPT2"
   "EPT3" "FAX" "FITS" "FPX" "G3" "GIF" "GIF87" "HDF" "JNG" "JP2" "JPC" "JPEG" "JPG" "M2V" "MIFF" "MNG" "MPC"
   "MPEG" "MPG" "MVG" "PBM" "PCD" "PCL" "PCT" "PCX" "PDB" "PDF" "PFA" "PFB" "PGM" "PGX" "PICT" "PNG" "PNG24"
   "PNG32" "PNG8" ...))
  regexp-opt-group(("AVI" "BMP" "BMP2" "BMP3" "CIN" "DCM" "DCX" "DPX" "EMF" "EPI" "EPS" "EPSF" "EPSI" "EPT"
   "EPT2" "EPT3" "FAX" "FITS" "FPX" "G3" "GIF" "GIF87" "HDF" "JNG" "JP2" "JPC" "JPEG" "JPG" "M2V" "MIFF" "MNG"
   "MPC" "MPEG" "MPG" "MVG" "PBM" "PCD" "PCL" "PCT" "PCX" "PDB" "PDF" "PFA" "PFB" "PGM" "PGX" "PICT" "PNG"
   "PNG24" "PNG32" ...) "\\(")
  regexp-opt(("XWD" "XCF" "WPG" "WMFWIN32" "VIFF" "VICAR" "TTF" "TTC" "SVGZ" "SVG" "SGI" "SFW" "SCT" "RLE"
   "RAS" "PWP" "PSD" "PNM" "PNG8" "PNG32" "PNG24" "PICT" "PGX" "PFB" "PFA" "PDF" "PDB" "PCX" "PCT" "PCL"
   "PCD" "MVG" "MPG" "MPEG" "MPC" "MNG" "MIFF" "M2V" "JPC" "JP2" "JNG" "HDF" "GIF87" "G3" "FPX" "FITS" "FAX"
   "EPT3" "EPT2" "EPT" ...) t)
  image-file-name-regexp()

• 2005-04-23 (土) 18:40:08 taku : こんちは。最近忙しくて、レスポンス悪くてすみません。"も"さんのおっしゃる通り、elisp-compのEOF文字列の前の行に(set max-specpdl-size 617)でmakeしたら、うまくいきました。感謝です。EOFの意味を取り違えていました、今頃気が付いて申し訳ありません。。以下がelisp-compの修正内容です。

 (let ((extra-load-path (split-string "$load_path" "::")))
 (if extra-load-path
     (setq load-path (nconc extra-load-path load-path))))
 (setq load-path (cons nil load-path))
+(setq max-specpdl-size 617)
 EOF
    $EMACS -q -batch -l $compile -f batch-byte-compile $*
    exit_status=$?
    rm -f $compile
    exit $exit_status
 fi

• 2005-04-23 (土) 21:54:33 名無しさん : そんなとこが罠でしたかー. じゃあ image-file-name-regexp 使うのやめときます. thx > おふたかた
• 2005-04-24 (日) 09:59:54 名無しさん : ひょっとして, (length image-file-name-extensions) がすごいことになってたり? まさか, 単に meadow 起動して (image-file-name-regexp) を評価するだけでこけたりしませんよね ^^;
• 2005-04-24 (日) 12:33:33 も : (length image-file-name-extensions)=74 でした。Debian 版では 11 個なので「すごいこと」になっているといえるかな。meadow.el の中で (mw32-get-image-magick-extensions) で取得した 70個以上の拡張子（下記）を追加しているのが原因のようです。

("avi" "bmp" "bmp2" "bmp3" "cin" "dcm" "dcx" "dpx" "emf" "epi" "eps"
 "epsf" "epsi" "ept" "ept" "ept2" "ept3" "fax" "fits" "fpx" "g3" "gif"
 "gif87" "hdf" "htm" "html" "jng" "jp2" "jpc" "jpeg" "m2v" "miff" "mng"
 "mpc" "mpeg" "mpg" "mvg" "pcd" "pcl" "pct" "pcx" "pdb" "pdf" "pfa"
 "pfb" "pgx" "pict" "png" "png24" "png32" "png8" "pnm" "psd" "pwp"
 "ras" "rle" "sct" "sfw" "sgi" "shtml" "svg" "svgz" "tiff" "ttc" "ttf"
 "txt" "vicar" "viff" "wmfwin32" "wpg" "xbm" "xcf" "xpm" "xwd")