Lines Matching refs:tem
244 Lisp_Object tem;
358 tem = call0 (readcharfun);
360 if (NILP (tem))
362 return XINT (tem);
530 Lisp_Object tem, tem1;
531 tem = Fget (val, Qevent_symbol_element_mask);
532 if (!NILP (tem))
534 tem1 = Fget (Fcar (tem), Qascii_character);
538 XSETFASTINT (val, XINT (tem1) | XINT (Fcar (Fcdr (tem))));
881 Lisp_Object tem;
882 for (tem = Vloads_in_progress; CONSP (tem); tem = XCDR (tem))
883 if (!NILP (Fequal (found, XCAR (tem))))
1311 register Lisp_Object tem, tem2;
1319 tem = XCAR (tail);
1322 if (!NILP (Fequal (filename, Fcar (tem))))
1344 if (NILP (Fmember (newelt, tem)))
1345 Fsetcar (tail, Fcons (XCAR (tem),
1346 Fcons (newelt, XCDR (tem))));
1590 Lisp_Object tem, buf;
1600 tem = Qsymbolp;
1602 tem = printflag;
1608 specbind (Qstandard_output, tem);
1634 Lisp_Object tem, cbuf;
1639 tem = Qsymbolp;
1641 tem = printflag;
1642 specbind (Qstandard_output, tem);
2388 Lisp_Object tem;
2409 tem = read0 (readcharfun);
2412 substitute_object_in_subtree (tem, placeholder);
2415 Fsetcdr (cell, tem);
2417 return tem;
2422 tem = Fassq (make_number (n), read_objects);
2423 if (CONSP (tem))
2424 return XCDR (tem);
3054 register Lisp_Object tem, item, vector;
3058 tem = read_list (1, readcharfun);
3059 len = Flength (tem);
3066 item = Fcar (tem);
3111 otem = XCONS (tem);
3112 tem = Fcdr (tem);
3132 register Lisp_Object elt, tem;
3282 tem = (read_pure && flag <= 0
3286 XSETCDR (tail, tem);
3288 val = tem;
3289 tail = tem;
3330 Lisp_Object tem;
3337 tem = oblookup (obarray, str, len, len);
3338 if (SYMBOLP (tem))
3339 return tem;
3365 register Lisp_Object tem, sym, *ptr;
3372 tem = oblookup (obarray, SDATA (string),
3375 if (!INTEGERP (tem))
3376 return tem;
3394 ptr = &XVECTOR (obarray)->contents[XINT (tem)];
3412 register Lisp_Object tem, string;
3425 tem = oblookup (obarray, SDATA (string), SCHARS (string), SBYTES (string));
3426 if (INTEGERP (tem) || (SYMBOLP (name) && !EQ (name, tem)))
3429 return tem;
3442 register Lisp_Object string, tem;
3456 tem = oblookup (obarray, SDATA (string),
3459 if (INTEGERP (tem))
3462 if (SYMBOLP (name) && !EQ (name, tem))
3465 XSYMBOL (tem)->interned = SYMBOL_UNINTERNED;
3466 XSYMBOL (tem)->constant = 0;
3467 XSYMBOL (tem)->indirect_variable = 0;
3471 if (EQ (XVECTOR (obarray)->contents[hash], tem))
3473 if (XSYMBOL (tem)->next)
3474 XSETSYMBOL (XVECTOR (obarray)->contents[hash], XSYMBOL (tem)->next);
3487 if (EQ (following, tem))
3514 Lisp_Object bucket, tem;
3543 XSETINT (tem, hash);
3544 return tem;
3617 Lisp_Object *tem;
3633 tem = &XVECTOR (Vobarray)->contents[hash];
3634 *tem = Qnil;
3821 Lisp_Object tem, tem1, sitelisp;
3829 tem = Fcar (Vload_path);
3831 tem, Qnil);
3835 sitelisp = Fcons (tem, sitelisp);
3843 tem = Fexpand_file_name (build_string ("lisp"),
3845 tem1 = Ffile_exists_p (tem);
3848 if (NILP (Fmember (tem, Vload_path)))
3851 Vload_path = Fcons (tem, Vload_path);
3860 tem = Fexpand_file_name (build_string ("leim"),
3862 tem1 = Ffile_exists_p (tem);
3865 if (NILP (Fmember (tem, Vload_path)))
3866 Vload_path = Fcons (tem, Vload_path);
3870 tem = Fexpand_file_name (build_string ("site-lisp"),
3872 tem1 = Ffile_exists_p (tem);
3875 if (NILP (Fmember (tem, Vload_path)))
3876 Vload_path = Fcons (tem, Vload_path);
3887 tem = Fexpand_file_name (build_string ("src/Makefile"),
3889 tem1 = Ffile_exists_p (tem);
3895 tem = Fexpand_file_name (build_string ("src/Makefile.in"),
3897 tem2 = Ffile_exists_p (tem);
3900 tem = Fexpand_file_name (build_string ("lisp"),
3903 if (NILP (Fmember (tem, Vload_path)))
3904 Vload_path = Fcons (tem, Vload_path);
3906 tem = Fexpand_file_name (build_string ("leim"),
3909 if (NILP (Fmember (tem, Vload_path)))
3910 Vload_path = Fcons (tem, Vload_path);
3912 tem = Fexpand_file_name (build_string ("site-lisp"),
3915 if (NILP (Fmember (tem, Vload_path)))
3916 Vload_path = Fcons (tem, Vload_path);