mes: Add ceil, floor, round, inexact->exact.
authorJan Nieuwenhuizen <janneke@gnu.org>
Sun, 21 Oct 2018 10:07:06 +0000 (12:07 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sun, 21 Oct 2018 10:07:06 +0000 (12:07 +0200)
* mes/module/mes/scm.mes (ceil, floor, round, inexact->exact,
exact->inexact): New function.

mes/module/mes/scm.mes

index bc58b53c62bb35d1e820ee58c181d28fd042d210..740a358f6eef081738a23024d4d8b8cb456d6dab 100644 (file)
   (lambda args
     (not (apply proc args))))
 
+(define ceil identity)
+(define floor identity)
+(define round identity)
+(define inexact->exact identity)
+(define exact->inexact identity)
+
 (define (const . rest)
   (lambda (. _)
     (car rest)))