Home
last modified time | relevance | path

Searched refs:C_unfix (Results 1 – 25 of 28) sorted by relevance

12

/dports/lang/chicken5/chicken-5.3.0/
H A Dchicken.h1243 C_unfix(end1) - C_unfix(start1) ), C_SCHEME_UNDEFINED)
2886 x = C_unfix(x); in C_a_u_i_fix_to_big()
2908 x = (x & C_INT_SIGN_BIT) ? -C_unfix(x) : C_unfix(x); in C_i_fixnum_gcd()
2909 y = (y & C_INT_SIGN_BIT) ? -C_unfix(y) : C_unfix(y); in C_i_fixnum_gcd()
2928 y = C_unfix(y); in C_u_fixnum_modulo()
2964 x = C_unfix(x); in C_i_fixnum_remainder_checked()
2965 y = C_unfix(y); in C_i_fixnum_remainder_checked()
3010 C_word z = C_unfix(x) - C_unfix(y); in C_a_i_fixnum_difference()
3021 C_word z = C_unfix(x) + C_unfix(y); in C_a_i_fixnum_plus()
3035 x = (x & C_INT_SIGN_BIT) ? -C_unfix(x) : C_unfix(x); in C_a_i_fixnum_times()
[all …]
H A Dposixunix.scm102 #define C_fchdir(fd) C_fix(fchdir(C_unfix(fd)))
111 #define C_waitpid(id, o) C_fix(waitpid(C_unfix(id), &C_wait_status, C_unfix(o)))
113 #define C_kill(id, s) C_fix(kill(C_unfix(id), C_unfix(s)))
118 #define C_chown(fn, u, g) C_fix(chown(C_c_string(fn), C_unfix(u), C_unfix(g)))
119 #define C_fchown(fd, u, g) C_fix(fchown(C_unfix(fd), C_unfix(u), C_unfix(g)))
121 #define C_fchmod(fd, m) C_fix(fchmod(C_unfix(fd), C_unfix(m)))
127 #define C_setpgid(x, y) C_fix(setpgid(C_unfix(x), C_unfix(y)))
138 #define C_umask(m) C_fix(umask(C_unfix(m)))
174 #define C_open(fn, fl, m) C_fix(open(C_c_string(fn), C_unfix(fl), C_unfix(m)))
175 #define C_read(fd, b, n) C_fix(read(C_unfix(fd), C_data_pointer(b), C_unfix(n)))
[all …]
H A Dposix-common.scm78 ((ptm)->tm_sec = C_unfix(C_block_item((v), 0)), \
79 (ptm)->tm_min = C_unfix(C_block_item((v), 1)), \
80 (ptm)->tm_hour = C_unfix(C_block_item((v), 2)), \
81 (ptm)->tm_mday = C_unfix(C_block_item((v), 3)), \
82 (ptm)->tm_mon = C_unfix(C_block_item((v), 4)), \
83 (ptm)->tm_year = C_unfix(C_block_item((v), 5)), \
84 (ptm)->tm_wday = C_unfix(C_block_item((v), 6)), \
85 (ptm)->tm_yday = C_unfix(C_block_item((v), 7)), \
114 #define C_dup(x) C_fix(dup(C_unfix(x)))
115 #define C_dup2(x, y) C_fix(dup2(C_unfix(x), C_unfix(y)))
[all …]
H A Druntime.c6188 if (C_unfix(C_i_fixnum_length(x)) <= 8) n = C_unfix(x);
6238 if (C_unfix(C_i_fixnum_length(x)) <= 16) n = C_unfix(x);
6875 y = C_unfix(y);
7492 else if(C_ilen(C_unfix(x)) <= C_unfix(bits)) return x;
9049 n = C_unfix(n);
9829 return C_mk_bool(C_unfix(x) > C_unfix(y));
9876 return C_mk_bool(C_unfix(x) < C_unfix(y));
9924 return C_mk_bool(C_unfix(x) >= C_unfix(y));
9974 return C_mk_bool(C_unfix(x) <= C_unfix(y));
10393 y = (y & C_INT_SIGN_BIT) ? -C_unfix(y) : C_unfix(y);
[all …]
H A Dposixwin.scm112 #define C_chmod(fn, m) C_fix(chmod(C_c_string(fn), C_unfix(m)))
113 #define C_pipe(d, m) C_fix(_pipe(C_pipefds, PIPE_BUF, C_unfix(m)))
114 #define C_close(fd) C_fix(close(C_unfix(fd)))
122 #define C_u_i_spawnvp(m,f,a) C_fix(spawnvp(C_unfix(m), C_c_string(f), (const char *const *)C_c_p…
125 #define C_open(fn, fl, m) C_fix(open(C_c_string(fn), C_unfix(fl), C_unfix(m)))
126 #define C_read(fd, b, n) C_fix(read(C_unfix(fd), C_data_pointer(b), C_unfix(n)))
127 #define C_write(fd, b, n) C_fix(write(C_unfix(fd), C_data_pointer(b), C_unfix(n)))
131 #define C_umask(m) C_fix(_umask(C_unfix(m)))
224 HANDLE fh = (HANDLE)_get_osfhandle(C_unfix(fd));
247 else return C_fix(chmod(path, C_unfix(m)));
[all …]
H A Dscheduler.scm66 ts.tv_nsec = (long)C_unfix(msec) * 1000000;
79 #define C_fd_input_ready(fd,pos) C_mk_bool(FD_ISSET(C_unfix(fd), &C_fdset_input))
80 #define C_fd_output_ready(fd,pos) C_mk_bool(FD_ISSET(C_unfix(fd), &C_fdset_output))
112 #define C_fd_input_ready(fd,pos) C_mk_bool(C_fd_ready(C_unfix(fd), C_unfix(pos),POLLIN|POLLERR|POL…
113 #define C_fd_output_ready(fd,pos) C_mk_bool(C_fd_ready(C_unfix(fd), C_unfix(pos),POLLOUT|POLLERR|P…
H A Dtcp.c28 int fd = C_unfix(sock); in make_socket_nonblocking()
71 int fd = C_unfix(sock); in make_socket_nonblocking()
248 int s=(int )C_unfix(C_a0); in stub245()
264 int s=(int )C_unfix(C_a0); in stub240()
277 int s=(int )C_unfix(C_a0); in stub235()
290 int s=(int )C_unfix(C_a0); in stub229()
306 int s=(int )C_unfix(C_a0); in stub218()
320 int t0=(int )C_unfix(C_a0); in stub209()
327 int t0=(int )C_unfix(C_a0); in stub204()
334 int t0=(int )C_unfix(C_a0); in stub195()
[all …]
H A Dsrfi-4.scm35 …mcpy((C_char *)C_data_pointer(to) + C_unfix(start_to), (C_char *)C_data_pointer(from) + C_unfix(st…
H A Dposixunix.c97 #define C_dup2(x, y) C_fix(dup2(C_unfix(x), C_unfix(y)))
104 #define C_lseek(fd, o, w) C_fix(lseek(C_unfix(fd), C_num_to_int64(o), C_unfix(w)))
210 #define C_waitpid(id, o) C_fix(waitpid(C_unfix(id), &C_wait_status, C_unfix(o)))
212 #define C_kill(id, s) C_fix(kill(C_unfix(id), C_unfix(s)))
217 #define C_chown(fn, u, g) C_fix(chown(C_c_string(fn), C_unfix(u), C_unfix(g)))
218 #define C_fchown(fd, u, g) C_fix(fchown(C_unfix(fd), C_unfix(u), C_unfix(g)))
220 #define C_fchmod(fd, m) C_fix(fchmod(C_unfix(fd), C_unfix(m)))
226 #define C_setpgid(x, y) C_fix(setpgid(C_unfix(x), C_unfix(y)))
273 #define C_open(fn, fl, m) C_fix(open(C_c_string(fn), C_unfix(fl), C_unfix(m)))
274 #define C_read(fd, b, n) C_fix(read(C_unfix(fd), C_data_pointer(b), C_unfix(n)))
[all …]
H A Dtcp.scm50 int fd = C_unfix(sock);
93 int fd = C_unfix(sock);
H A Ddbg-stub.c279 C_snprintf(rw_buffer, sizeof(rw_buffer), " %ld", (long)C_unfix(x)); in send_scheme_value()
H A Dposixwin.c61 (ptm)->tm_min = C_unfix(C_block_item((v), 1)), \
96 #define C_dup(x) C_fix(dup(C_unfix(x)))
97 #define C_dup2(x, y) C_fix(dup2(C_unfix(x), C_unfix(y)))
104 #define C_lseek(fd, o, w) C_fix(lseek(C_unfix(fd), C_num_to_int64(o), C_unfix(w)))
180 #define C_close(fd) C_fix(close(C_unfix(fd)))
191 #define C_open(fn, fl, m) C_fix(open(C_c_string(fn), C_unfix(fl), C_unfix(m)))
192 #define C_read(fd, b, n) C_fix(read(C_unfix(fd), C_data_pointer(b), C_unfix(n)))
193 #define C_write(fd, b, n) C_fix(write(C_unfix(fd), C_data_pointer(b), C_unfix(n)))
313 else return C_fix(chmod(path, C_unfix(m))); in C_fchmod()
777 int t7=(int )C_unfix(C_a7); in stub1476()
[all …]
H A Dlolevel.c138 int t0=(int )C_unfix(C_a0); in stub494()
180 int t0=(int )C_unfix(C_a0); in stub320()
189 int t2=(int )C_unfix(C_a2); in stub199()
190 int t3=(int )C_unfix(C_a3); in stub199()
191 int t4=(int )C_unfix(C_a4); in stub199()
200 int t2=(int )C_unfix(C_a2); in stub183()
201 int t3=(int )C_unfix(C_a3); in stub183()
202 int t4=(int )C_unfix(C_a4); in stub183()
211 int t2=(int )C_unfix(C_a2); in stub167()
212 int t3=(int )C_unfix(C_a3); in stub167()
[all …]
H A Dfile.scm44 #define C_test_access(fn, m) C_fix(access(C_c_string(fn), C_unfix(m)))
H A Dscheduler.c35 ts.tv_nsec = (long)C_unfix(msec) * 1000000; in C_msleep()
48 #define C_fd_input_ready(fd,pos) C_mk_bool(FD_ISSET(C_unfix(fd), &C_fdset_input))
49 #define C_fd_output_ready(fd,pos) C_mk_bool(FD_ISSET(C_unfix(fd), &C_fdset_output))
81 #define C_fd_input_ready(fd,pos) C_mk_bool(C_fd_ready(C_unfix(fd), C_unfix(pos),POLLIN|POLLERR|POL…
82 #define C_fd_output_ready(fd,pos) C_mk_bool(C_fd_ready(C_unfix(fd), C_unfix(pos),POLLOUT|POLLERR|P…
179 int t0=(int )C_unfix(C_a0); in stub446()
188 int t0=(int )C_unfix(C_a0); in stub387()
H A Dlibrary.scm61 #define C_a_f64peek(ptr, c, b, i) C_flonum(ptr, ((double *)C_data_pointer(b))[ C_unfix(i) ])
62 #define C_fetch_c_strlen(b, i) C_fix(strlen((C_char *)C_block_item(b, C_unfix(i))))
64 … to, len) (C_memcpy(C_data_pointer(to), (C_char *)C_block_item(b, C_unfix(i)), C_unfix(len)), C_SC…
65 #define C_free_mptr(p, i) (C_free((void *)C_block_item(p, C_unfix(i))), C_SCHEME_UNDEFINED)
66 #define C_free_sptr(p, i) (C_free((void *)(((C_char **)C_block_item(p, 0))[ C_unfix(i) ])), C_S…
73 int n = C_unfix(size);
112 int n = C_unfix (len);
113 char * buf = ((char *)C_data_pointer (dest) + C_unfix (pos));
H A Deval.scm1360 …py((char *)C_block_item(buf, 0), C_c_string(str), C_unfix(n)), ((char *)C_block_item(buf, 0))[ C_u…
H A Dport.c150 int t0=(int )C_unfix(C_a0); in stub551()
159 int t0=(int )C_unfix(C_a0); in stub537()
166 int t0=(int )C_unfix(C_a0); in stub515()
174 int m=(int )C_unfix(C_a1); in stub144()
175 int s=(int )C_unfix(C_a2); in stub144()
4260 av2[2]=C_make_character(C_unfix(t4)); in f_992()
H A Dirregex.c9921 t2=C_make_character(C_unfix(t1)); in f_13329()
9983 t2=C_make_character(C_unfix(t1)); in f_13363()
11359 t6=C_make_character(C_unfix(t5)); in f_14482()
11431 t8=C_make_character(C_unfix(t7)); in f_14508()
11560 t4=C_make_character(C_unfix(t3)); in f_14580()
11563 t7=C_make_character(C_unfix(t6)); in f_14580()
11806 t4=C_make_character(C_unfix(t3)); in f_14716()
11837 t4=C_make_character(C_unfix(t3)); in f_14752()
11895 t5=C_make_character(C_unfix(t4)); in f_14774()
11977 t2=C_make_character(C_unfix(t1)); in f_14835()
[all …]
H A Dlibrary.c35 int n = C_unfix(size); in fast_read_line_from_file()
74 int n = C_unfix (len); in fast_read_string_from_file()
1204 C_return(C_main_argv[C_unfix(i)]); in stub6827()
1219 int t0=(int )C_unfix(C_a0); in stub6807()
1241 int t1=(int )C_unfix(C_a1); in stub6495()
1249 int t1=(int )C_unfix(C_a1); in stub6476()
1267 int t1=(int )C_unfix(C_a1); in stub2831()
32288 t2=C_make_character(C_unfix(t1)); in f_20747()
32962 t3=C_make_character(C_unfix(t2)); in f_21009()
37737 t6=C_make_character(C_unfix(t5)); in f_23209()
[all …]
H A Dfile.c13 #define C_test_access(fn, m) C_fix(access(C_c_string(fn), C_unfix(m)))
145 int t0=(int )C_unfix(C_a0); in stub142()
H A Dc-backend.c8501 t6=C_make_character(C_unfix(t5)); in f_13165()
8504 t9=C_make_character(C_unfix(t8)); in f_13165()
8506 t11=C_make_character(C_unfix(t10)); in f_13165()
8588 t4=C_make_character(C_unfix(t3)); in f_13281()
8591 t7=C_make_character(C_unfix(t6)); in f_13281()
8594 t10=C_make_character(C_unfix(t9)); in f_13281()
8596 t12=C_make_character(C_unfix(t11)); in f_13281()
8747 t5=C_make_character(C_unfix(t4)); in f_13374()
8756 t6=C_make_character(C_unfix(t5)); in f_13374()
H A Dsrfi-4.c12 …mcpy((C_char *)C_data_pointer(to) + C_unfix(start_to), (C_char *)C_data_pointer(from) + C_unfix(st…
H A Dcsi.c50 int t1=(int )C_unfix(C_a1); in stub733()
7158 t2=C_make_character(C_unfix(((C_word*)t0)[2])); in f_5614()
9465 av2[2]=C_make_character(C_unfix(t1)); in f_6676()
/dports/devel/swig/swig-4.0.2/Lib/chicken/
H A Dchicken.swg135 //SIMPLE_TYPEMAP(enum SWIGTYPE, C_unfix, C_fix, C_swig_is_fixnum, (int), 0);
160 *((int *)(void *)&$1) = C_unfix($input);

12