[plamo:06914] Re: gcl

[cyamauch]

  山内です．

  gcl，ソースをちょっと調べてみました．

  NULL_OR_ON_C_STACK macro invalid で止まってしまうとこ
ろのソースは，o/main.c の

initlisp()
{
        int j;

        if (NULL_OR_ON_C_STACK(&j) == 0
            || NULL_OR_ON_C_STACK(Cnil) != 0
            || (((unsigned long )core_end) !=0
                && NULL_OR_ON_C_STACK(core_end) != 0))
          { /* check person has correct definition of above */
            error("NULL_OR_ON_C_STACK macro invalid");
          }
        init_alloc();

  ここらしい事がわかり，NULL_OR_ON_C_STACKのマクロを定義
しているファイルを調べてみると，いくつかのヘッダファイル
に機種(OS)別に定義されていて，例えば,

h/NeXT30-m68k.h:#define NULL_OR_ON_C_STACK(x) ((x)==0||(((unsigned int)(x)) >= 0x3f00000 )) 
h/NeXT32-i386.h:#define NULL_OR_ON_C_STACK(x) ((x)==0||(((unsigned int)(x)) >= 0xbff00000))
h/NeXT32-m68k.h:#define NULL_OR_ON_C_STACK(x) ((x)==0||(((unsigned int)(x)) >= 0x3f00000 )) 
h/alpha-osf1.h:#define NULL_OR_ON_C_STACK(x) ((long)x < TBEGIN)
h/gnuwin95.h:#define NULL_OR_ON_C_STACK(y)\
h/hp800.h:#define NULL_OR_ON_C_STACK(x) (x == 0 ||   ((unsigned int) x) >=0x70000000)
h/irix5.h:#define NULL_OR_ON_C_STACK(x) ((((int)x) << 1) <=0)
h/notcomp.h:#ifndef NULL_OR_ON_C_STACK
h/notcomp.h:#define NULL_OR_ON_C_STACK(x) ((int)x <= 0)     
h/rios-aix3.h:#define NULL_OR_ON_C_STACK(x) ( x == 0 || (((unsigned int) x) >= 0x2f000000 )) 
h/rios.h:#define NULL_OR_ON_C_STACK(x) ( x == 0 || (((unsigned int) x) >= 0x2f000000 )) 
h/solaris.h:#define NULL_OR_ON_C_STACK(x) (((x)==0) || ((unsigned long) x) < 0x8048000)

  こんなかんじです．

  なんとなく，クリティカルな事が原因っぽい匂いがするの
ですが，わかる方，いらっしゃいますか？

　マクロの書き方がいけないのか，gccにあるオプションを付
けてコンパイルしないといけないのか…？？

------                                           ------
  Chisato Yamauchi
    Mail: cyamauch@phyas.aichi-edu.ac.jp
          cyamauch@hst.phyas.aichi-edu.ac.jp
    URL:  http://phe.phyas.aichi-edu.ac.jp/~cyamauch/
------                                           ------