🚀 go-pugleaf

In article <1992Mar6.220034.21615@ux1.cso.uiuc.edu>, chlg1043@uxa (Christopher H Lee) writes:
>Has anyone tried porting gcc to the HPPA?
>apparently, the assembler has some problems during
>the make process which i can't get a handle on.

I could eliminate assembler's error with following modifications.

		Name: Nobuyuki Hikichi <hikichi@sra.co.jp>
		Office: Software Research Associates, Inc. Japan.
#!/bin/sh
# This is a shell archive (produced by shar 3.49)
# To extract the files from this archive, save it to a file, remove
# everything above the "!/bin/sh" line above, and type "sh file_name".
#
# made 03/08/1992 08:01 UTC by hikichi@srarc2
# Source directory /tmp
#
# existing files will NOT be overwritten unless -c is specified
#
# This shar contains:
# length  mode       name
# ------ ---------- ------------------------------------------
#   1267 -rw-r--r-- hppa.diff
#
# ============= hppa.diff ==============
if test -f 'hppa.diff' -a X"$1" != X"-c"; then
	echo 'x - skipping hppa.diff (File already exists)'
else
echo 'x - extracting hppa.diff (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'hppa.diff' &&
*** ./hp800.c	Thu Feb  6 09:01:15 1992
--- /tmp/hp800.c	Sun Mar  8 16:51:49 1992
***************
*** 1798,1804 ****
X  	  offset = INTVAL (XEXP (XEXP (x, 0),1));
X  	else abort();
X        if (GET_CODE (XEXP (x, 0)) == PLUS)
! 	sep= "+";
X        else
X  	if (GET_CODE (XEXP (x, 0)) == MINUS
X  	    && (GET_CODE (XEXP (XEXP (x, 0), 0)) == SYMBOL_REF))
--- 1798,1812 ----
X  	  offset = INTVAL (XEXP (XEXP (x, 0),1));
X  	else abort();
X        if (GET_CODE (XEXP (x, 0)) == PLUS)
! 	{
! 	  if (offset < 0)
! 	    {
! 	      offset = -offset;
! 	      sep = "-";
! 	    }
! 	  else
! 	    sep= "+";
! 	}
X        else
X  	if (GET_CODE (XEXP (x, 0)) == MINUS
X  	    && (GET_CODE (XEXP (XEXP (x, 0), 0)) == SYMBOL_REF))
hikichi@srarc2 $ diff -c3 hp800.md /tmp
*** hp800.md	Wed Jan 29 14:45:52 1992
--- /tmp/hp800.md	Sun Mar  8 16:51:51 1992
***************
*** 416,421 ****
--- 416,424 ----
X      {
X        if (!(GET_CODE (operands[3]) == EQ || GET_CODE (operands[3]) == NE))
X  	PUT_CODE (operands[3], reverse_relop (GET_CODE (operands[3])));
+       if (INTVAL (operands[2]) & 0x700)
+ 	operands[2] = gen_rtx (CONST_INT, VOIDmode, (-1 | 0x7ff) |
+ 					  INTVAL (operands[2]));
X        output_asm_insn (\"comiclr,%N3 %2,%1,%0\;ldi 1,%0\", operands);
X        return \"\";
X      }
SHAR_EOF
chmod 0644 hppa.diff ||
echo 'restore of hppa.diff failed'
Wc_c="`wc -c < 'hppa.diff'`"
test 1267 -eq "$Wc_c" ||
	echo 'hppa.diff: original size 1267, current size' "$Wc_c"
fi
exit 0