help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: what is the point of point-min?


From: Jim Janney
Subject: Re: what is the point of point-min?
Date: Sun, 7 Sep 2003 00:50:01 -0600
User-agent: MacSOUP/2.5b2 (Mac OS 9.2.2)

Rob Thorpe <robert.thorpe@antenova.com> wrote, in part:

> From editfns.c:-
> 
> /* Return the start or end position of the region.
>    BEGINNINGP non-zero means return the start.
>    If there is no region active, signal an error. */
> 
> static Lisp_Object
> region_limit (beginningp)
>      int beginningp;
> {
>   extern Lisp_Object Vmark_even_if_inactive; /* Defined in callint.c.
> */
>   Lisp_Object m;
>   
>   if (!NILP (Vtransient_mark_mode)
>       && NILP (Vmark_even_if_inactive)
>       && NILP (current_buffer->mark_active))
>     Fsignal (Qmark_inactive, Qnil);
>   
>   m = Fmarker_position (current_buffer->mark);
>   if (NILP (m))
>     error ("There is no region now");
>   
>   if ((PT < XFASTINT (m)) == beginningp)
>     m = make_number (PT);
>   return m;
> }

Note that the description of BEGINNINGP in the comment is wrong: the way
the code is written, it only returns the start when beginningp is 1.

-- 
Jim Janney 


reply via email to

[Prev in Thread] Current Thread [Next in Thread]