From mboxrd@z Thu Jan  1 00:00:00 1970
Date: Fri, 17 Nov 1995 09:46:46 -0500
From: philw@plan9.att.com philw@plan9.att.com
Subject: polymorphic buglet
Topicbox-Message-UUID: 34f5b090-eac8-11e9-9e20-41e7f4b1d025
Message-ID: <19951117144646.YceAog58NUzkDPQp_Do3rnyYW2XSah6dKV8gWAtxJPw@z>

These diffs fix both of forsyth's complaints.
diff's are relative to the CD.

This fixes the poly bug.

philw-helix% diff parl.y /n/juke/plan_9/sys/src/alef/port
242,254d241
< 		| Ttypename
< 		{
< 			$$ = an(ONAME, nil, nil);
< 			if($1.t->type != TPOLY) {
< 				diag(nil, "type parameter must be poly [%T]", $1.t);
< 				$$->t = at(TPOLY, 0);
< 				$$->sym = enter("POLY", Ttypename);
< 			}
< 			else {
< 				$$->t = $1.t;
< 				$$->sym = $1.s;
< 			}
< 		}

This fixes the !{.

347d346
< 	static int itmp;
355c354
< 	sprint(buf, ".i%d", itmp++);
---
> 	sprint(buf, ".i%d", stmp++);

You need to put the !{ fix in v/reg.c, 8/reg.c and k/reg.c

I will put a boddle on the web page tonight.

phil