[bpt/guile.git] / libguile / cpp_cnvt.awk

# Converts a list of symbols into C expressions which define the symbols
# in Guile.
{
print "#ifdef " $0;
print "scm_sysintern (\""$0"\", SCM_MAKINUM ("$0"));";
print "#endif"
}
Commit	Line	Data
67ec3667 GH	1	# Converts a list of symbols into C expressions which define the symbols
	2	# in Guile.
	3	{
	4	print "#ifdef " $0;
	5	print "scm_sysintern (\""$0"\", SCM_MAKINUM ("$0"));";
	6	print "#endif"
	7	}