File: theme-d-support-all.scm

package info (click to toggle)
theme-d 1.4.0-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, sid
  • size: 12,784 kB
  • sloc: lisp: 47,684; sh: 4,200; makefile: 455; ansic: 319
file content (80 lines) | stat: -rw-r--r-- 1,203 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80

;; Copyright (C) 2019 Tommi Höynälänmaa
;; Distributed under GNU Lesser General Public License version 3,
;; see file doc/LGPL-3.

;; Support for primitives written in Scheme.


(define-module (theme-d runtime theme-d-support)
  #:export (is-real?
	    is-integer?
	    r-sqrt
	    r-expt
	    r-sin
	    r-cos
	    r-tan
	    r-asin
	    r-acos
	    r-atan
	    r-atan2
	    r-exp
	    r-log
	    r-log10
	    r-sinh
	    r-cosh
	    r-tanh
	    r-asinh
	    r-acosh
	    r-atanh
	    r-round
	    r-truncate
	    r-floor
	    r-ceiling
	    
	    fmod
	    r-remainder
	    fma
	    fast-fma?
	    fmin
	    fmax
	    fdim
	    r-exp2
	    r-expm1
	    r-log2
	    r-log1p
	    logb
	    ilogb
	    ilogb0
	    ilogbnan
	    r-cbrt
	    r-hypot
	    r-erf
	    r-erfc
	    r-lgamma
	    r-tgamma
	    r-nearbyint
	    rint
	    frexp
	    ldexp
	    modf
	    r-nextafter
	    r-copysign
	    fpclassify
	    fpclassify-nan
	    fpclassify-infinite
	    fpclassify-zero
	    fpclassify-subnormal
	    fpclassify-normal
	    r-isnormal?
	    r-signbit

	    r-j0
	    r-j1
	    r-jn
	    r-y0
	    r-y1
	    r-yn))

(eval-when (load)
	   (load-extension "libthemedsupport" "init_theme_d_support"))