🚀 go-pugleaf

$BN6C+$NCfLn$G$9!#(B

In article <KURODA.98Feb19181111@msi.co.jp> kuroda@msi.co.jp (KURODA Hisao
 / =?ISO-2022-JP?B?GyRCJC8kbSRAGyhCIBskQiRSJDUkKhsoQg==?=) writes:

 |>(si::hostname-to-hostid "unix")
 |calling 'dl' function sun did not supply..exitting
 |
 |$B2?$,0-$$$N$+!"$I$J$?$+$*?4$"$?$j$4$6$$$^$7$?$i!"$<$R65$($F$/$@$5$$!#(B

$B2?$b0-$/$J$$$H;W$$$^$9!#(B

gcl 2.2 $B$N:"$N5-21$G$9$,!"(Bsolaris 2.x $B$K4X$7$F$O(B static link $B$7$F(B dump
$B$9$k$h$&$K$J$C$F$$$F!"(Bgetpw* $B$H$+(B get*by* $B$H$+!"%@%$%J%_%C%/%j%s%/$r9T(B
$B$&(B(dlopen/dlsym $B$J$I$r;H$&(B)$B%i%$%V%i%j4X?t$K0MB8$7$F$$$k(B(Lisp $B$N(B)$B4X?t$,(B
$B;H$($J$+$C$?$H5-21$7$F$$$^$9!#(B

$BNc$($P!"(B(file-author "/") $B$J$s$+$b$@$a$G$7$?!#(B
--
			Hiroshi Nakano <nakano@math.ryukoku.ac.jp>
			Ryukoku Univ., Seta, Otsu, Japan

In article <NAKANO.98Feb20152222@dolphin61.math.ryukoku.ac.jp>
nakano@math.ryukoku.ac.jp (Hiroshi NAKANO) writes:
 |gcl 2.2 $B$N:"$N5-21$G$9$,!"(Bsolaris 2.x $B$K4X$7$F$O(B static link $B$7$F(B dump
 |$B$9$k$h$&$K$J$C$F$$$F!"(Bgetpw* $B$H$+(B get*by* $B$H$+!"%@%$%J%_%C%/%j%s%/$r9T(B
 |$B$&(B(dlopen/dlsym $B$J$I$r;H$&(B)$B%i%$%V%i%j4X?t$K0MB8$7$F$$$k(B(Lisp $B$N(B)$B4X?t$,(B
 |$B;H$($J$+$C$?$H5-21$7$F$$$^$9!#(B

$B$$$^!"(Bgcl 2.2.2 $B$N%=!<(B$B%9$r8+$F$_$?$i!"(Bdynamic link $B$G$b$A$c$s$H(B dump
$B=PMh$=$&$@$C$?$N$G!"(Bh/solaris.defs $B$N(B LDCC= ${CC} -static $B$+$i(B -static
$B$r=|$$$F!"(Badd-defs solaris; make $B$7$F$_$^$7$?$,!"$H$j$"$($:$OF0$/$_$?(B
$B$$$G$9!#(B

$B$?$@(B$B$7!"(BSolaris 2.5.1/SPARC $B$G$NOC$G!":Y$+$$$H$3$m$^$GBg>fIW$J$N$+$I$&(B
$B$+$K$D$$$F$OD4$Y$F$$$^$;$s!#(B
--
			Hiroshi Nakano <nakano@math.ryukoku.ac.jp>
			Ryukoku Univ., Seta, Otsu, Japan

$BD9:d$G$9!#(B

In article <NAKANO.98Feb20152222@dolphin61.math.ryukoku.ac.jp>
nakano@math.ryukoku.ac.jp writes:

$B!U(B  |>(si::hostname-to-hostid "unix")
$B!U(B  |calling 'dl' function sun did not supply..exitting
$B!U(B  |
$B!U(B  |$B2?$,0-$$$N$+!"$I$J$?$+$*?4$"$?$j$4$6$$$^$7$?$i!"$<$R65$($F$/$@$5$$!#(B
$B!U(B 
$B!U(B $B2?$b0-$/$J$$$H;W$$$^$9!#(B
$B!U(B 
$B!U(B gcl 2.2 $B$N:"$N5-21$G$9$,!"(Bsolaris 2.x $B$K4X$7$F$O(B static link $B$7$F(B dump
$B!U(B $B$9$k$h$&$K$J$C$F$$$F!"(Bgetpw* $B$H$+(B get*by* $B$H$+!"%@%$%J%_%C%/%j%s%/$r9T(B
$B!U(B $B$&(B(dlopen/dlsym $B$J$I$r;H$&(B)$B%i%$%V%i%j4X?t$K0MB8$7$F$$$k(B(Lisp $B$N(B)$B4X?t$,(B
$B!U(B $B;H$($J$+$C$?$H5-21$7$F$$$^$9!#(B

Solaris2.x $B$K(B GNU dll $B$,BP1~$7$F$$$J$$$+$i$G$O!#(B

-------
Text by Kohsaku Nagasaka. [E-mail: nagasaka@first.tsukuba.ac.jp]

$B4N?4$J;v$r=q$-K:$l$F$$$^$7$?!#(B

In article <NAKANO.98Feb20165933@dolphin61.math.ryukoku.ac.jp>
nakano@math.ryukoku.ac.jp (Hiroshi NAKANO) writes:
 |$B$$$^!"(Bgcl 2.2.2 $B$N%=!<%9$r8+$F$_$?$i!"(Bdynamic link $B$G$b$A$c$s$H(B dump
 |$B=PMh$=$&$@$C$?$N(B$B$G!"(Bh/solaris.defs $B$N(B LDCC= ${CC} -static $B$+$i(B -static
 |$B$r=|$$$F!"(Badd-defs solaris; make $B$7$F$_$^$7$?(B$B$,!"$H$j$"$($:$OF0$/$_$?(B
 |$B$$$G$9!#(B

$B0J2<$N%Q%C%A(B (o/run_process.c $BCf$N(B dlopen/dlclose/dgettext/dlerror/dlsym
$B$J$I$N(B stub $B$r>C$9(B) $B$,I,MW$G$9!#(B

diff -c o/run_process.c.ORG o/run_process.c
*** o/run_process.c.ORG	Fri Feb 20 17:13:56 1998
--- o/run_process.c	Fri Feb 20 17:11:32 1998
***************
*** 321,326 ****
--- 321,327 ----
  { return PAGESIZE;
  }
  
+ #if 0
  dlclose()
  {fprintf(stderr,"calling 'dl' function sun did not supply..exitting") ;exit(1);}
  dgettext()
***************
*** 332,337 ****
--- 333,339 ----
  
  dlsym()
  {dlclose();}
+ #endif
  
  
  

--
			Hiroshi Nakano <nakano@math.ryukoku.ac.jp>
			Ryukoku Univ., Seta, Otsu, Japan

In article <NAKANO.98Feb20152222@dolphin61.math.ryukoku.ac.jp> nakano@math.ryukoku.ac.jp (Hiroshi NAKANO) writes:

 | 龍谷の中野です。

ありがとうございます。これ以上お聞きするのはlispの話とずれると思います
ので、fj.sys.sunにもクロスポストさせてください。

 | gcl 2.2 の頃の記憶ですが、solaris 2.x に関しては static link して dump
 | するようになっていて、getpw* とか get*by* とか、ダイナミックリンクを行
 | う(dlopen/dlsym などを使う)ライブラリ関数に依存している(Lisp の)関数が
 | 使えなかったと記憶しています。

これは現行のgclの枠組みの中ではどうにもならないものでしょうか?  とりあ
えずCLXを動かしたいのですがgclの配付に含まれるo/clxsocket.cが、
gethostbynameを呼びに行っているため、成功しません。

(gclの関数からgethostbynameを呼びに行くのに)、
少々面倒だけれども、やり方としてはある、というアイデアでも結構です。
教えて頂けると助かります。

;;; $Id: .signature,v 1.3 1996/09/20 07:06:26 kuroda Exp $
(define (くろだ ひさお)
  (email kuroda@msi.co.jp))

In article <NAKANO.98Feb20165933@dolphin61.math.ryukoku.ac.jp> nakano@math.ryukoku.ac.jp (Hiroshi NAKANO) writes:

 | いま、gcl 2.2.2 のソースを見てみたら、dynamic link でもちゃんと dump
 | 出来そうだったので、h/solaris.defs の LDCC= ${CC} -static から -static
 | を除いて、add-defs solaris; make してみましたが、とりあえずは動くみた
 | いです。

このやりかたでCLX(CLX-5.02-gcl-2.1)も動きました。
大変助かりました。どうもありがとうございました。

;;; $Id: .signature,v 1.3 1996/09/20 07:06:26 kuroda Exp $
(define (くろだ ひさお)
  (email kuroda@msi.co.jp))