rename (picrin number) to (picrin math)

This commit is contained in:
Yuichi Nishiwaki 2015-07-20 01:16:06 +09:00
parent d66ae479cc
commit fcb6b1ead8
3 changed files with 3 additions and 3 deletions

View File

@ -144,7 +144,7 @@ pic_number_sqrt(pic_state *pic)
void void
pic_init_math(pic_state *pic) pic_init_math(pic_state *pic)
{ {
pic_deflibrary (pic, "(picrin number)") { pic_deflibrary (pic, "(picrin math)") {
pic_defun(pic, "finite?", pic_number_finite_p); pic_defun(pic, "finite?", pic_number_finite_p);
pic_defun(pic, "infinite?", pic_number_infinite_p); pic_defun(pic, "infinite?", pic_number_infinite_p);
pic_defun(pic, "nan?", pic_number_nan_p); pic_defun(pic, "nan?", pic_number_nan_p);

View File

@ -1,6 +1,6 @@
(define-library (scheme base) (define-library (scheme base)
(import (picrin base) (import (picrin base)
(only (picrin number) sqrt) (only (picrin math) sqrt)
(picrin macro) (picrin macro)
(picrin string) (picrin string)
(scheme file)) (scheme file))

View File

@ -1,6 +1,6 @@
(define-library (scheme inexact) (define-library (scheme inexact)
(import (picrin base) (import (picrin base)
(picrin number)) (picrin math))
(export acos (export acos
asin asin