Function: prog1

prog1 is a special form defined in eval.c.

Signature

(prog1 FIRST BODY...)

Documentation

Eval FIRST and BODY sequentially; return value from FIRST.

The value of FIRST is saved during the evaluation of the remaining args, whose values are discarded.

View in manual

Source Code

// Defined in /usr/src/emacs/src/eval.c
{
  Lisp_Object val = eval_sub (XCAR (args));
  prog_ignore (XCDR (args));
  return val;
}