#! /usr/bin/perl
#
#  TOPPERS/JSP Kernel
#      Toyohashi Open Platform for Embedded Real-Time Systems/
#      Just Standard Profile Kernel
# 
#  Copyright (C) 2000 by Embedded and Real-Time Systems Laboratory
#                              Toyohashi Univ. of Technology, JAPAN
# 
#  嵭Ԥϡʲξ˸¤ꡤܥեȥܥ
#  եȥѤΤޤࡥʲƱˤѡʣѡ
#  ۡʰʲѤȸƤ֡ˤ뤳Ȥ̵ǵ롥
#  (1) ܥեȥ򥽡ɤηѤˤϡ嵭
#      ɽѾ浪Ӳ̵ݾڵ꤬Τޤޤηǥ
#      ˴ޤޤƤ뤳ȡ
#  (2) ܥեȥХʥꥳɤηޤϵȤ߹
#      ѤˤϡΤ줫ξȡ
#    (a) ѤȼɥȡѼԥޥ˥奢ʤɡˤˡ嵭
#        ɽѾ浪Ӳ̵ݾڵǺܤ뤳ȡ
#    (b) Ѥη֤̤ˡˤäơ嵭Ԥ𤹤
#        ȡ
#  (3) ܥեȥѤˤľŪޤϴŪ뤤ʤ»
#      ⡤嵭Ԥդ뤳ȡ
# 
#  ܥեȥϡ̵ݾڤ󶡤ƤΤǤ롥嵭Ԥϡ
#  ܥեȥ˴ؤơŬѲǽޤơʤݾڤԤ
#  ʤޤܥեȥѤˤľŪޤϴŪ
#  ʤ»˴ؤƤ⡤Ǥʤ
# 
#  @(#) $Id: genoffset,v 1.1 2000/11/14 14:44:30 hiro Exp $
# 

$flag = 0;

print "/* This file is generated by genoffset. */\n";
print "\n";

while ($line = <>) {
	chop $line;

	if ($line =~ /! BEGIN/) {
		$flag = 1;
	}
	elsif ($line =~ /! END/) {
		$flag = 0;
	}
	elsif ($flag) {
		$line =~ s/^([^ \t]+) = #([^ \t]+)/#define $1\t$2/;
		print $line,"\n";
	}
}
