diff options
author | yugui <yugui@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-10-04 13:12:13 +0000 |
---|---|---|
committer | yugui <yugui@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-10-04 13:12:13 +0000 |
commit | bbbd9c0b7be96824e4648b551b3a66763df38788 (patch) | |
tree | 6ff6cd1d2496e9394fb712108e63906f6b2d9e0c /x68/_round.c | |
parent | 0c0e636b19559715798dcbf6493cb4327c60488f (diff) |
* x68/_dtos18.c: removed. Ruby no longer supports human68k.
* x68/_round.c: ditto.
* x68/fconvert.c: ditto.
* x68/select.c: ditto.
* ext/Setup.x68: ditto.
* missing/x68.c: ditto.
* dln.c (dln_find_exe_r): removed human68k supports.
(dln_find_1): ditto.
* lib/mkmf.rb: ditto.
* ext/extmk.rb (Init_ext): ditto.
* ext/socket/socket.c (init_sock): ditto.
* gc.c (GC_MALLOC_LIMIT): ditto.
(rb_setjmp, rb_jmpbuf): ditto.
(mark_current_machine_context): ditto.
* include/ruby/defines.h (PATH_ENV): ditto.
* io.c: ditto.
* process.c: ditto.
* ruby.c: ditto.
* test/ruby/test_env.rb: ditto.
* test/ruby/test_path.rb: ditto.
* LEGAL
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@19677 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'x68/_round.c')
-rw-r--r-- | x68/_round.c | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/x68/_round.c b/x68/_round.c deleted file mode 100644 index 761930fb8c..0000000000 --- a/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$ - */ -/* changed 1997.2.2 by K.Okabe */ - -/* System headers */ -#include <stdlib.h> -#include <sys/xstdlib.h> - -/* 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; -} |