From 54ec1c4fe81672ca66f327ef6ae170f458cd79e5 Mon Sep 17 00:00:00 2001 From: shyouhei Date: Wed, 15 Aug 2007 20:57:30 +0000 Subject: sorry. I made wrong tags. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_8_5_54@13009 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ruby_1_8_5/x68/_round.c | 45 --------------------------------------------- 1 file changed, 45 deletions(-) delete mode 100644 ruby_1_8_5/x68/_round.c (limited to 'ruby_1_8_5/x68/_round.c') diff --git a/ruby_1_8_5/x68/_round.c b/ruby_1_8_5/x68/_round.c deleted file mode 100644 index 364582f8f6..0000000000 --- a/ruby_1_8_5/x68/_round.c +++ /dev/null @@ -1,45 +0,0 @@ -/* - * PROJECT C Library, X68000 PROGRAMMING INTERFACE DEFINITION - * -------------------------------------------------------------------- - * This file is written by the Project C Library Group, and completely - * in public domain. You can freely use, copy, modify, and redistribute - * the whole contents, without this notice. - * -------------------------------------------------------------------- - * $Id: _round.c,v 1.1.1.2 1999/01/20 04:59:39 matz Exp $ - */ -/* changed 1997.2.2 by K.Okabe */ - -/* System headers */ -#include -#include - -/* Functions */ -int _round (char *top, char *cur, int undig) -{ - char *ptr; - - /* 最後が5未満なら丸めは必要ない */ - if (undig < '5') - return 0; - - /* ポインタ設定 */ - ptr = cur - 1; - - /* 先頭まで戻りながら丸め処理 */ - while (ptr >= top) { - - /* 繰り上がらなければそれで終わり */ - if (++(*ptr) <= '9') - return 0; - - /* その桁を0に戻す */ - *ptr-- = '0'; - - } - - /* 先頭を1にする */ - *++ptr = '1'; - - /* 繰り上がりをしらせる */ - return 1; -} -- cgit v1.2.3