#!/bin/rc

tags=`{cat /mnt/acme/$winid/tag}

switch($objtype){
case 386
	c=8c
	l=8l
	o=8
case arm
	c=5c
	l=5l
	o=5
}

if(~ $#c 0)
	echo objtype $objtype missing
if not {
	s = `{echo $tags(1) | sed 's/\.c$//'}
	$c $s.c && $l -o $s $s.$o 
}