t 208 ext/auxsys/auxsyslib.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 216 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, n);
t 507 ext/auxsys/auxsyslib.c ScmObj h = SCM_NIL, t;
t 510 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_utime));
t 511 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_stime));
t 512 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_cutime));
t 513 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_cstime));
t 515 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(sysconf(_SC_CLK_TCK)));
t 518 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(CLK_TCK)); /* older name */
t 520 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(1)); /* or maybe 100, we don't know ...*/
t 801 ext/auxsys/auxsyslib.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 803 ext/auxsys/auxsyslib.c #define APPCONS(a, b) SCM_APPEND1(h, t, Scm_Cons(a, b))
t 1170 ext/charconv/jconv.c for (p=s, q=t; *p && *q; p++, q++) {
t 27 ext/digest/md5c.c u_int32_t t;
t 29 ext/digest/md5c.c t = (u_int32_t) ((unsigned) buf[3] << 8 | buf[2]) << 16 |
t 31 ext/digest/md5c.c *(u_int32_t *) buf = t;
t 58 ext/digest/md5c.c u_int32_t t;
t 62 ext/digest/md5c.c t = ctx->bits[0];
t 63 ext/digest/md5c.c if ((ctx->bits[0] = t + ((u_int32_t) len << 3)) < t)
t 67 ext/digest/md5c.c t = (t >> 3) & 0x3f; /* Bytes already in shsInfo->data */
t 71 ext/digest/md5c.c if (t) {
t 72 ext/digest/md5c.c unsigned char *p = (unsigned char *) ctx->in + t;
t 74 ext/digest/md5c.c t = 64 - t;
t 75 ext/digest/md5c.c if (len < t) {
t 79 ext/digest/md5c.c memcpy(p, buf, t);
t 82 ext/digest/md5c.c buf += t;
t 83 ext/digest/md5c.c len -= t;
t 112 ext/digest/sha.c #define expandx(W,i) (t = W[i&15] ^ W[(i-14)&15] ^ W[(i-8)&15] ^ W[(i-3)&15],\
t 113 ext/digest/sha.c ROTL(1, t))
t 155 ext/digest/sha.c register uint32_t t;
t 270 ext/digest/sha.c uint32_t t = ctx->bytesLo;
t 271 ext/digest/sha.c if ((ctx->bytesLo = t + len) < t)
t 274 ext/digest/sha.c i = (unsigned) t % SHA_BLOCKBYTES; /* Bytes already in ctx->key */
t 321 ext/digest/sha.c uint32_t t;
t 353 ext/digest/sha.c t = ctx->iv[i];
t 354 ext/digest/sha.c digest[i * 4 + 0] = (u_char) (t >> 24);
t 355 ext/digest/sha.c digest[i * 4 + 1] = (u_char) (t >> 16);
t 356 ext/digest/sha.c digest[i * 4 + 2] = (u_char) (t >> 8);
t 357 ext/digest/sha.c digest[i * 4 + 3] = (u_char) t;
t 66 ext/fcntl/fcntl.c static ScmObj SCM_CPP_CAT3(flock_, name, _get)(ScmSysFlock* t) \
t 67 ext/fcntl/fcntl.c { return Scm_MakeInteger(t->lock.name); } \
t 68 ext/fcntl/fcntl.c static void SCM_CPP_CAT3(flock_, name, _set)(ScmSysFlock* t, ScmObj v) \
t 71 ext/fcntl/fcntl.c t->lock.name = (type)Scm_GetInteger(v); \
t 68 ext/net/netdb.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 74 ext/net/netdb.c SCM_APPEND1(h, t, SCM_MAKE_STR_COPYING(*p));
t 77 ext/net/netdb.c h = t = SCM_NIL;
t 87 ext/net/netdb.c SCM_APPEND1(h, t, SCM_MAKE_STR_COPYING(buf));
t 229 ext/net/netdb.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 235 ext/net/netdb.c SCM_APPEND1(h, t, SCM_MAKE_STR_COPYING(*p));
t 353 ext/net/netdb.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 359 ext/net/netdb.c SCM_APPEND1(h, t, SCM_MAKE_STR_COPYING(*p));
t 515 ext/net/netdb.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 523 ext/net/netdb.c SCM_APPEND1(h, t, SCM_OBJ(make_addrinfo(res)));
t 55 ext/termios/termios.c ScmSysTermios *t = SCM_NEW(ScmSysTermios);
t 56 ext/termios/termios.c SCM_SET_CLASS(t, SCM_CLASS_SYS_TERMIOS);
t 57 ext/termios/termios.c memset(&t->term, 0, sizeof(t->term));
t 58 ext/termios/termios.c return SCM_OBJ(t);
t 63 ext/termios/termios.c static ScmObj SCM_CPP_CAT3(termios_, name, _get)(ScmSysTermios* t) \
t 64 ext/termios/termios.c { return Scm_MakeIntegerFromUI((u_long)t->term.name); } \
t 65 ext/termios/termios.c static void SCM_CPP_CAT3(termios_, name, _set)(ScmSysTermios* t, ScmObj v) \
t 68 ext/termios/termios.c t->term.name = (tcflag_t)Scm_GetUInteger(v); \
t 78 ext/termios/termios.c return Scm_MakeU8VectorFromArray(NCCS, (const unsigned char*)t->term.c_cc);
t 90 ext/termios/termios.c memcpy(t->term.c_cc, SCM_U8VECTOR_ELEMENTS(val), NCCS);
t 707 ext/uvector/uvector.c #define SWAP(x, y) (t = dd.c[x], dd.c[x] = dd.c[y], dd.c[y] = t)
t 715 ext/uvector/uvector.c unsigned char t;
t 727 ext/uvector/uvector.c unsigned char t;
t 740 ext/uvector/uvector.c unsigned char t;
t 82 ext/uvector/uvinit.c ScmObj t;
t 421 gc/aix_irix_threads.c GC_thread t;
t 439 gc/aix_irix_threads.c t = GC_new_thread(pthread_self());
t 442 gc/aix_irix_threads.c t -> stack_cold = 0; /* the original stack. */
t 443 gc/aix_irix_threads.c t -> stack_hot = (ptr_t)(&t);
t 444 gc/aix_irix_threads.c t -> flags = DETACHED;
t 562 gc/aix_irix_threads.c GC_thread t;
t 111 gc/cord/cordxtra.c register const char * t = s;
t 113 gc/cord/cordxtra.c while((buf[count] = *t++) != '\0') {
t 607 gc/include/gc.h # define GC_NEW(t) (t *)GC_MALLOC(sizeof (t))
t 608 gc/include/gc.h # define GC_NEW_ATOMIC(t) (t *)GC_MALLOC_ATOMIC(sizeof (t))
t 609 gc/include/gc.h # define GC_NEW_STUBBORN(t) (t *)GC_MALLOC_STUBBORN(sizeof (t))
t 610 gc/include/gc.h # define GC_NEW_UNCOLLECTABLE(t) (t *)GC_MALLOC_UNCOLLECTABLE(sizeof (t))
t 44 gc/include/gc_typed.h # define GC_WORD_OFFSET(t, f) (offsetof(t,f)/sizeof(GC_word))
t 45 gc/include/gc_typed.h # define GC_WORD_LEN(t) (sizeof(t)/ sizeof(GC_word))
t 46 gc/include/gc_typed.h # define GC_BITMAP_SIZE(t) ((GC_WORD_LEN(t) + GC_WORDSZ-1)/GC_WORDSZ)
t 1316 gc/include/private/gc_priv.h # define GC_push_conditional(b, t, all) GC_push_all(b, t)
t 38 gc/include/weakpointer.h WeakPointer( T* t = 0 )
t 41 gc/include/weakpointer.h {impl = _WeakPointer_New( t );}
t 115 gc/include/weakpointer.h static void Set( T* t, void c( Data* d, T* t ), Data* d = 0 )
t 122 gc/include/weakpointer.h {_CleanUp_Set( t, c, d );}
t 124 gc/include/weakpointer.h static void Call( T* t )
t 128 gc/include/weakpointer.h {_CleanUp_Call( t );}
t 135 gc/include/weakpointer.h void Set( T* t )
t 137 gc/include/weakpointer.h {_CleanUp_Queue_Set( this->head, t );}
t 208 gc/include/weakpointer.h void* _WeakPointer_New( void* t );
t 212 gc/include/weakpointer.h void _CleanUp_Set( void* t, void (*c)( void* d, void* t ), void* d );
t 213 gc/include/weakpointer.h void _CleanUp_Call( void* t );
t 215 gc/include/weakpointer.h void _CleanUp_Queue_Set( void* h, void* t );
t 1277 gc/mark.c # define GC_PUSH_ALL(b,t) GC_push_selected(b,t,GC_true_func,GC_push_all);
t 1279 gc/mark.c # define GC_PUSH_ALL(b,t) GC_push_all(b,t);
t 1454 gc/mark.c word * t = (word *)(((word) top) & ~(ALIGNMENT-1));
t 1466 gc/mark.c lim = t - 1 /* longword */;
t 1969 gc/os_dep.c result = PCR_ThCtl_GetInfo(t, &info);
t 845 gc/pthread_support.c GC_thread t;
t 856 gc/pthread_support.c t = GC_new_thread(pthread_self());
t 858 gc/pthread_support.c t -> stop_info.mach_thread = mach_thread_self();
t 860 gc/pthread_support.c t -> stop_info.stack_ptr = (ptr_t)(&dummy);
t 862 gc/pthread_support.c t -> flags = DETACHED | MAIN_THREAD;
t 74 gc/solaris_pthreads.c GC_thread t;
t 154 gc/solaris_pthreads.c t = GC_new_thread(my_new_thread);
t 155 gc/solaris_pthreads.c t -> flags = my_flags;
t 156 gc/solaris_pthreads.c if (!(my_flags & DETACHED)) cond_init(&(t->join_cv), USYNC_THREAD, 0);
t 157 gc/solaris_pthreads.c t -> stack = stack;
t 158 gc/solaris_pthreads.c t -> stack_size = stack_size;
t 743 gc/solaris_threads.c register GC_thread t;
t 754 gc/solaris_threads.c for (t = GC_threads[i]; t != 0; t = t -> next) {
t 755 gc/solaris_threads.c if (!(t -> flags & (DETACHED | FINISHED))) {
t 765 gc/solaris_threads.c t = GC_lookup_thread(departed);
t 767 gc/solaris_threads.c if (!(t -> flags & CLIENT_OWNS_STACK)) {
t 768 gc/solaris_threads.c GC_stack_free(t -> stack, t -> stack_size);
t 770 gc/solaris_threads.c if (t -> flags & DETACHED) {
t 773 gc/solaris_threads.c t -> status = status;
t 774 gc/solaris_threads.c t -> flags |= FINISHED;
t 775 gc/solaris_threads.c cond_signal(&(t -> join_cv));
t 787 gc/solaris_threads.c GC_thread t;
t 804 gc/solaris_threads.c t = GC_new_thread(thr_self());
t 805 gc/solaris_threads.c t -> stack_size = 0;
t 806 gc/solaris_threads.c t -> flags = DETACHED | CLIENT_OWNS_STACK;
t 823 gc/solaris_threads.c GC_thread t;
t 829 gc/solaris_threads.c t = GC_lookup_thread(target_thread);
t 830 gc/solaris_threads.c if (t == 0) ABORT("thread unknown to GC");
t 831 gc/solaris_threads.c t -> flags |= SUSPNDED;
t 839 gc/solaris_threads.c GC_thread t;
t 845 gc/solaris_threads.c t = GC_lookup_thread(target_thread);
t 846 gc/solaris_threads.c if (t == 0) ABORT("thread unknown to GC");
t 847 gc/solaris_threads.c t -> flags &= ~SUSPNDED;
t 855 gc/solaris_threads.c register GC_thread t;
t 866 gc/solaris_threads.c for (t = GC_threads[i]; t != 0; t = t -> next) {
t 867 gc/solaris_threads.c if (!(t -> flags & DETACHED)) {
t 868 gc/solaris_threads.c if (t -> flags & FINISHED) {
t 882 gc/solaris_threads.c t = GC_lookup_thread(wait_for);
t 883 gc/solaris_threads.c if (t == 0 || t -> flags & DETACHED) {
t 891 gc/solaris_threads.c while (!(t -> flags & FINISHED)) {
t 892 gc/solaris_threads.c cond_wait(&(t -> join_cv), &GC_allocate_ml);
t 897 gc/solaris_threads.c if (status) *status = t -> status;
t 898 gc/solaris_threads.c if (departed) *departed = t -> id;
t 899 gc/solaris_threads.c cond_destroy(&(t -> join_cv));
t 900 gc/solaris_threads.c GC_delete_thread(t -> id);
t 913 gc/solaris_threads.c GC_thread t;
t 937 gc/solaris_threads.c t = GC_new_thread(my_new_thread);
t 938 gc/solaris_threads.c t -> flags = my_flags;
t 939 gc/solaris_threads.c if (!(my_flags & DETACHED)) cond_init(&(t -> join_cv), USYNC_THREAD, 0);
t 940 gc/solaris_threads.c t -> stack = stack;
t 941 gc/solaris_threads.c t -> stack_size = stack_size;
t 546 gc/tests/test.c pthread_t t;
t 548 gc/tests/test.c if ((code = pthread_create(&t, 0, tiny_reverse_test, 0)) != 0) {
t 553 gc/tests/test.c if ((code = pthread_join(t, 0)) != 0) {
t 743 gc/tests/test.c tn * t = (tn *)obj;
t 760 gc/tests/test.c if ((int)(GC_word)client_data != t -> level) {
t 765 gc/tests/test.c t -> level = -1; /* detect duplicate finalization immediately */
t 905 gc/tests/test.c if (n == 0 && t != 0) {
t 910 gc/tests/test.c if (t -> level != n) {
t 919 gc/tests/test.c chktree(t -> lchild, n-1);
t 924 gc/tests/test.c chktree(t -> rchild, n-1);
t 24 gc/tests/thread_leak_test.c pthread_t t[NTHREADS];
t 28 gc/tests/thread_leak_test.c if ((code = pthread_create(t + i, 0, test, 0)) != 0) {
t 33 gc/tests/thread_leak_test.c if ((code = pthread_join(t[i], 0)) != 0) {
t 1258 src/bignum.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 1267 src/bignum.c SCM_APPEND1(h, t, SCM_MAKE_CHAR(tab[rem]));
t 1271 src/bignum.c if (q->sign < 0) SCM_APPEND1(h, t, SCM_MAKE_CHAR('-'));
t 549 src/char.c ScmObj h = SCM_NIL, t = SCM_NIL, cell;
t 558 src/char.c SCM_APPEND1(h, t, cell);
t 566 src/char.c SCM_APPEND1(h, t, cell);
t 570 src/char.c SCM_APPEND1(h, t, cell);
t 578 src/char.c SCM_APPEND1(h, t, cell);
t 209 src/class.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 210 src/class.c if (array) while (len-- > 0) SCM_APPEND1(h, t, SCM_OBJ(*array++));
t 216 src/class.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 218 src/class.c for (i=0; i<len; i++, array++) SCM_APPEND1(h, t, (*array)->name);
t 1989 src/class.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 2004 src/class.c if (n == m->common.required) SCM_APPEND1(h, t, SCM_OBJ(m));
t 2171 src/class.c ScmObj lp, h, t;
t 2208 src/class.c h = t = SCM_NIL;
t 2210 src/class.c SCM_APPEND1(h, t, specarray[i]->name);
t 2750 src/class.c ScmObj h = SCM_NIL, t;
t 2752 src/class.c SCM_APPEND1(h, t, SCM_OBJ(klass));
t 2753 src/class.c for (p = klass->cpa; *p; p++) SCM_APPEND1(h, t, SCM_OBJ(*p));
t 2793 src/class.c ScmObj slots = SCM_NIL, t = SCM_NIL;
t 2817 src/class.c SCM_APPEND1(slots, t,
t 57 src/code.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 59 src/code.c SCM_APPEND1(h, t, cc->name);
t 869 src/code.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 878 src/code.c SCM_APPEND1(h, t, SCM_LIST1(SCM_INTERN(name)));
t 881 src/code.c SCM_APPEND1(h, t, SCM_LIST2(SCM_INTERN(name),
t 885 src/code.c SCM_APPEND1(h, t, SCM_LIST3(SCM_INTERN(name),
t 895 src/code.c SCM_APPEND1(h, t, SCM_OBJ(cc->code[++i]));
t 899 src/code.c SCM_APPEND1(h, t, SCM_MAKE_INT(off));
t 903 src/code.c SCM_APPEND(h, t, SCM_LIST2(SCM_OBJ(cc->code[i+1]),
t 307 src/error.c ScmObj h = SCM_NIL, t = SCM_NIL, cp, cond;
t 338 src/error.c SCM_APPEND(h, t, cc->conditions);
t 340 src/error.c SCM_APPEND1(h, t, c);
t 460 src/error.c ScmObj h = SCM_NIL, t = SCM_NIL, cp;
t 463 src/error.c SCM_APPEND1(h, t, Scm__InternalClassName(Scm_ClassOf(cc)));
t 814 src/extlib.c ScmObj cp, h = SCM_NIL, t = SCM_NIL;
t 819 src/extlib.c else { SCM_SET_CDR(t, SCM_CAR(cp)); return h; }
t 821 src/extlib.c SCM_APPEND(h, t, SCM_CAR(cp));
t 5781 src/extlib.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 5782 src/extlib.c SCM_APPEND(h, t, SCM_LIST2(key_total_heap_size,
t 5784 src/extlib.c SCM_APPEND(h, t, SCM_LIST2(key_free_bytes,
t 5786 src/extlib.c SCM_APPEND(h, t, SCM_LIST2(key_bytes_since_gc,
t 5788 src/extlib.c SCM_APPEND(h, t, SCM_LIST2(key_total_bytes,
t 139 src/gauche/char_euc_jp.h const unsigned char *t;
t 143 src/gauche/char_euc_jp.h t = (unsigned char*)(cp-3);
t 144 src/gauche/char_euc_jp.h if (t[0] == 0x8f && t[1] >= 0x80 && t[2] >= 0x80) {
t 145 src/gauche/char_euc_jp.h return (const char *)t;
t 149 src/gauche/char_euc_jp.h t = (unsigned char*)(cp-2);
t 150 src/gauche/char_euc_jp.h if (t[0] >= 0x80 && t[1] >= 0x80) {
t 151 src/gauche/char_euc_jp.h return (const char*)t;
t 155 src/gauche/char_euc_jp.h t = (unsigned char*)(cp-1);
t 156 src/gauche/char_euc_jp.h if (t[0] < 0x80) {
t 157 src/gauche/char_euc_jp.h return (const char*)t;
t 720 src/hash.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 724 src/hash.c SCM_APPEND1(h, t, e->key);
t 733 src/hash.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 737 src/hash.c SCM_APPEND1(h, t, e->value);
t 744 src/hash.c ScmObj h = SCM_NIL, t;
t 749 src/hash.c SCM_APPEND1(h, t, SCM_MAKE_KEYWORD("num-entries"));
t 750 src/hash.c SCM_APPEND1(h, t, Scm_MakeInteger(table->numEntries));
t 751 src/hash.c SCM_APPEND1(h, t, SCM_MAKE_KEYWORD("num-buckets"));
t 752 src/hash.c SCM_APPEND1(h, t, Scm_MakeInteger(table->numBuckets));
t 753 src/hash.c SCM_APPEND1(h, t, SCM_MAKE_KEYWORD("num-buckets-log2"));
t 754 src/hash.c SCM_APPEND1(h, t, Scm_MakeInteger(table->numBucketsLog2));
t 761 src/hash.c SCM_APPEND1(h, t, SCM_MAKE_KEYWORD("contents"));
t 762 src/hash.c SCM_APPEND1(h, t, SCM_OBJ(v));
t 1528 src/intlib.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 1534 src/intlib.c SCM_APPEND1(h, t, v);
t 1728 src/intlib.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 1730 src/intlib.c SCM_APPEND1(h, t, Scm_Cons(SCM_CAR(lis1), SCM_CAR(lis2)));
t 107 src/keyword.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 112 src/keyword.c SCM_APPEND(h, t, tail);
t 115 src/keyword.c SCM_APPEND1(h, t, SCM_CAR(cp2));
t 146 src/list.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 150 src/list.c SCM_APPEND1(h, t, *elts++);
t 1086 src/load.c init_cond_features, t;
t 1088 src/load.c init_load_path = t = SCM_NIL;
t 1089 src/load.c SCM_APPEND(init_load_path, t, break_env_paths("GAUCHE_LOAD_PATH"));
t 1090 src/load.c SCM_APPEND1(init_load_path, t, Scm_SiteLibraryDirectory());
t 1091 src/load.c SCM_APPEND1(init_load_path, t, Scm_LibraryDirectory());
t 1093 src/load.c init_dynload_path = t = SCM_NIL;
t 1094 src/load.c SCM_APPEND(init_dynload_path, t, break_env_paths("GAUCHE_DYNLOAD_PATH"));
t 1095 src/load.c SCM_APPEND1(init_dynload_path, t, Scm_SiteArchitectureDirectory());
t 1096 src/load.c SCM_APPEND1(init_dynload_path, t, Scm_ArchitectureDirectory());
t 1098 src/load.c init_load_suffixes = t = SCM_NIL;
t 1099 src/load.c SCM_APPEND1(init_load_suffixes, t, SCM_MAKE_STR(LOAD_SUFFIX));
t 1101 src/load.c init_cond_features = t = SCM_NIL;
t 1102 src/load.c SCM_APPEND1(init_cond_features, t, SCM_LIST1(SCM_SYM_GAUCHE));
t 1104 src/load.c SCM_APPEND1(init_cond_features, t, SCM_LIST1(SCM_SYM_GAUCHE_WINDOWS));
t 1107 src/load.c SCM_APPEND1(init_cond_features, t, SCM_LIST1(SCM_SYM_GAUCHE_EUCJP));
t 1109 src/load.c SCM_APPEND1(init_cond_features, t, SCM_LIST1(SCM_SYM_GAUCHE_SJIS));
t 1111 src/load.c SCM_APPEND1(init_cond_features, t, SCM_LIST1(SCM_SYM_GAUCHE_UTF8));
t 1113 src/load.c SCM_APPEND1(init_cond_features, t, SCM_LIST1(SCM_SYM_GAUCHE_NONE));
t 354 src/macro.c ScmObj lp, h = SCM_NIL, t = SCM_NIL;
t 358 src/macro.c SCM_APPEND1(h, t, lit);
t 360 src/macro.c SCM_APPEND1(h, t, Scm_MakeIdentifier(SCM_SYMBOL(lit), mod, env));
t 383 src/macro.c ScmObj pp, h = SCM_NIL, t = SCM_NIL;
t 392 src/macro.c SCM_APPEND1(h, t, SCM_OBJ(nspat));
t 414 src/macro.c SCM_APPEND1(h, t,
t 419 src/macro.c SCM_APPEND(h, t, compile_rule1(pp, spat, ctx, patternp));
t 758 src/macro.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 761 src/macro.c SCM_APPEND1(h, t, SCM_VECTOR_ELEMENT(form, i));
t 785 src/macro.c ScmObj h = SCM_NIL, t = SCM_NIL, r, e;
t 791 src/macro.c SCM_APPEND(h, t, r);
t 795 src/macro.c SCM_APPEND1(h, t, r);
t 803 src/macro.c SCM_APPEND(h, t, r);
t 812 src/macro.c ScmObj h = SCM_NIL, t = SCM_NIL, r;
t 817 src/macro.c SCM_APPEND1(h, t, r);
t 822 src/macro.c ScmObj h = SCM_NIL, t = SCM_NIL, r, *pe;
t 830 src/macro.c SCM_APPEND(h, t, r);
t 834 src/macro.c SCM_APPEND1(h, t, r);
t 493 src/module.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 500 src/module.c SCM_APPEND1(h, t, e->value);
t 1171 src/number.c double t = result_real * r - result_imag * i;
t 1173 src/number.c result_real = t;
t 835 src/regexp.c ScmObj sp, sp2, e = SCM_UNBOUND, h, t;
t 842 src/regexp.c h = t = SCM_NIL;
t 844 src/regexp.c if (SCM_EQ(sp, sp2)) { SCM_APPEND1(h, t, e); break; }
t 845 src/regexp.c SCM_APPEND1(h, t, SCM_CAR(sp2));
t 848 src/regexp.c SCM_APPEND1(h, t, rc2_optimize(SCM_CAR(sp2), rest));
t 1092 src/stdlib.c double t;
t 1099 src/stdlib.c t = Scm_GetDouble(t_scm);
t 1103 src/stdlib.c SCM_RESULT = Scm_MakeComplexPolar(r, t);
t 1144 src/string.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 1146 src/string.c for (;*array; array++) SCM_APPEND1(h, t, SCM_MAKE_STR(*array));
t 1148 src/string.c for (i=0; i<size; i++) SCM_APPEND1(h, t, SCM_MAKE_STR(*array++));
t 1156 src/string.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 1159 src/string.c SCM_APPEND1(h, t, SCM_MAKE_STR_COPYING(*array));
t 1162 src/string.c SCM_APPEND1(h, t, SCM_MAKE_STR_COPYING(*array++));
t 1633 src/syslib.c ScmTime* t;
t 1637 src/syslib.c t = SCM_TIME(t_scm);
t 1641 src/syslib.c SCM_RESULT = Scm_TimeToSeconds(t);
t 1653 src/syslib.c double t;
t 1657 src/syslib.c t = Scm_GetDouble(t_scm);
t 1661 src/syslib.c SCM_RESULT = Scm_RealSecondsToTime(t);
t 597 src/system.c const char *t = Scm_GetStringContent(templat, &siz, NULL, NULL);
t 601 src/system.c memcpy(name, t, siz);
t 702 src/system.c ScmTime *t = SCM_ALLOCATE(ScmTime, klass);
t 703 src/system.c SCM_SET_CLASS(t, SCM_CLASS_TIME);
t 704 src/system.c t->type = SCM_SYM_TIME_UTC;
t 705 src/system.c t->sec = t->nsec = 0;
t 706 src/system.c return SCM_OBJ(t);
t 711 src/system.c ScmTime *t = SCM_TIME(obj);
t 712 src/system.c Scm_Printf(port, "#<%S %lu.%09lu>", t->type, t->sec, t->nsec);
t 748 src/system.c ScmTime *t = SCM_TIME(time_allocate(SCM_CLASS_TIME, SCM_NIL));
t 749 src/system.c t->type = SCM_FALSEP(type)? SCM_SYM_TIME_UTC : type;
t 750 src/system.c t->sec = sec;
t 751 src/system.c t->nsec = nsec;
t 752 src/system.c return SCM_OBJ(t);
t 785 src/system.c return t->type;
t 793 src/system.c t->type = val;
t 798 src/system.c return Scm_MakeInteger(t->sec);
t 806 src/system.c t->sec = Scm_GetInteger(val);
t 811 src/system.c return Scm_MakeInteger(t->nsec);
t 823 src/system.c t->nsec = l;
t 843 src/system.c return Scm_MakeIntegerFromUI((unsigned long)t);
t 845 src/system.c double val = (double)t;
t 873 src/system.c if (t->nsec) {
t 874 src/system.c return Scm_MakeFlonum((double)t->sec + (double)t->nsec/1.0e9);
t 876 src/system.c return Scm_MakeIntegerFromUI(t->sec);
t 884 src/system.c if (SCM_FALSEP(t)) return NULL;
t 885 src/system.c if (SCM_TIMEP(t)) {
t 886 src/system.c spec->tv_sec = SCM_TIME(t)->sec;
t 887 src/system.c spec->tv_nsec = SCM_TIME(t)->nsec;
t 888 src/system.c } else if (!SCM_REALP(t)) {
t 889 src/system.c Scm_Error("bad timeout spec: <time> object or real number is required, but got %S", t);
t 894 src/system.c if (SCM_EXACTP(t)) {
t 895 src/system.c spec->tv_sec += Scm_GetUInteger(t);
t 896 src/system.c } else if (SCM_FLONUMP(t)) {
t 898 src/system.c spec->tv_nsec += (unsigned long)(modf(Scm_GetDouble(t), &s)*1.0e9);
t 829 src/vm.c ScmObj *t = to, *a = ARGP;
t 834 src/vm.c for (c=0; c<argc; c++) *t++ = *a++;
t 1226 src/vm.c ScmObj *t = to, *a = ARGP;
t 1228 src/vm.c for (c=0; c<nargs; c++) *t++ = *a++;
t 1250 src/vm.c ScmObj *t = to, *a = ARGP;
t 1252 src/vm.c for (c=0; c<nargs; c++) *t++ = *a++;
t 3396 src/vm.c ScmObj h = SCM_NIL, t = SCM_NIL, p;
t 3402 src/vm.c SCM_APPEND1(h, t, SCM_CDAR(p));
t 3408 src/vm.c SCM_APPEND1(h, t, SCM_CAAR(p));
t 3629 src/vm.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 3632 src/vm.c SCM_APPEND1(h, t, vm->vals[i]);
t 1161 src/write.c ScmObj h = SCM_NIL, t = SCM_NIL;
t 1179 src/write.c SCM_APPEND1(h, t, Scm_MakeInteger(val));
t 1185 src/write.c SCM_APPEND1(h, t, Scm_MakeIntegerU(val));
t 1191 src/write.c SCM_APPEND1(h, t, Scm_MakeFlonum(val));
t 1198 src/write.c if (val != NULL) SCM_APPEND1(h, t, SCM_MAKE_STR(val));
t 1199 src/write.c else SCM_APPEND1(h, t, SCM_MAKE_STR("(null)"));
t 1209 src/write.c SCM_APPEND1(h, t, Scm_MakeIntegerU((unsigned long)val));
t 1215 src/write.c SCM_APPEND1(h, t, o);
t 1221 src/write.c SCM_APPEND1(h, t, Scm_MakeInteger(c));