[interchange-cvs] interchange - heins modified
code/Filter/round.filter
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Mon Jun 12 18:11:10 EDT 2006
User: heins
Date: 2006-06-12 22:11:09 GMT
Added: code/Filter round.filter
Log:
* Add filter to round in floating-point-safe way, using the Vend::Util
routine.
Revision Changes Path
1.1 interchange/code/Filter/round.filter
rev 1.1, prev_rev 1.0
Index: round.filter
===================================================================
# Copyright 2002-2005 Interchange Development Group (http://www.icdevgroup.org/)
# Copyright 1996-2002 Red Hat, Inc.
# Licensed under the GNU GPL v2. See file LICENSE for details.
# $Id: round.filter,v 1.1 2006/06/12 22:11:09 mheins Exp $
CodeDef round Filter
CodeDef round Description Rounds in floating-point-safe way using Vend::Util routine
CodeDef round Routine <<EOR
sub {
my ($val, undef, $digits) = @_;
return round_to_frac_digits($val, $digits);
}
EOR
More information about the interchange-cvs
mailing list