york@altger.UUCP (york) (11/21/90)
Has anybody got Perl 3.0 (pl41) working on a MIPS system ? I have tried it on a Cadmus 9604 RC. Three tests (e.g. op.eval) fail ! Greetings uli
beldar@mips.com (Gardner Cohen) (11/23/90)
In article <219@altger.UUCP> york@altger.UUCP (york) writes:
Has anybody got Perl 3.0 (pl41) working on a MIPS system ? I have
tried it on a Cadmus 9604 RC. Three tests (e.g. op.eval) fail !
I just built it on a Mips 6280 running risc/os 4.50, with the 2.11
compilers, and passed all tests. I'll be making this available for
ftp soon.
I made the following change to Configure, and had to edit config.sh to
disable 'volatile.' I compiled it -O2 -g3 -Olimit 10000. Note that I
build in the -systype sysv environment, not because I like to, but
because I'm lazy.
*** /tmp/,RCSt1a18413 Thu Nov 22 14:45:42 1990
--- Configure Thu Nov 22 14:25:56 1990
***************
*** 301,307 ****
spitshell=cat
echo " "
echo "Okay, let's see if #! works on this system..."
! echo "#!/bin/echo hi" > try
$eunicefix try
chmod +x try
./try > today
--- 301,307 ----
spitshell=cat
echo " "
echo "Okay, let's see if #! works on this system..."
! echo "#!/bsd43/bin/echo hi" > try
$eunicefix try
chmod +x try
./try > today
***************
*** 1133,1139 ****
*) thatlib="${thislib}_s";;
*) thatlib=NONE;;
esac
! xxx=`./loc lib$thislib.a X /usr/ccs/lib /usr/lib /usr/local/lib /lib`
if test -f $xxx; then
echo "Found -l$thislib."
case "$dflt" in
--- 1133,1139 ----
*) thatlib="${thislib}_s";;
*) thatlib=NONE;;
esac
! xxx=`./loc lib$thislib.a X /usr/ccs/lib /usr/lib /usr/local/lib /lib /sysv/usr/lib/cmplrs/cc`
if test -f $xxx; then
echo "Found -l$thislib."
case "$dflt" in
***************
*** 1451,1457 ****
echo " "
set `echo $libc $libnames | tr ' ' '\012' | sort | uniq`
$echo $n "Extracting names from $* for later perusal...$c"
! nm $* 2>/dev/null >libc.tmp
$sed -n -e 's/^.* [ATDS] *_[_.]*//p' -e 's/^.* [ATDS] //p' <libc.tmp >libc.list
if $contains '^printf$' libc.list >/dev/null 2>&1; then
echo "done"
--- 1451,1457 ----
echo " "
set `echo $libc $libnames | tr ' ' '\012' | sort | uniq`
$echo $n "Extracting names from $* for later perusal...$c"
! nm -B $* 2>/dev/null >libc.tmp
$sed -n -e 's/^.* [ATDS] *_[_.]*//p' -e 's/^.* [ATDS] //p' <libc.tmp >libc.list
if $contains '^printf$' libc.list >/dev/null 2>&1; then
echo "done"
--
Gardner Cohen beldar@mips.com {ames,decwrl,...}!mips!beldar (408) 524-8267