NAME
    isptr - whether a value is a pointer

SYNOPSIS
    isptr(x)

TYPES
    x		any

    return	0, 1, 2, 3, or 4

DESCRIPTION
    isptr(x) returns:

		0 if x is a not pointer
		1 if x is an octet-pointer
		2 if x is a value-pointer
		3 if x is a string-pointer
		4 if x is a number-pointer

     Pointers are initially defined by using the addreess (&) operator
     with an "addressable" value; currently, these are octets, lvalues,
     strings and real numbers.

EXAMPLE
    ; a = "abc", b = 3, B = blk()
    ; p1 = &B[1]
    ; p2 = &a
    ; p3 = &*a
    ; p4 = &*b
    ; print isptr(a), isptr(p1), isptr(p2), isptr(p3), isptr(p4)
    0 1 2 3 4

LIMITS
    none

LINK LIBRARY
    none

SEE ALSO
    isnum, isstr, isblk, isoctet

## Copyright (C) 1999-2006  Landon Curt Noll
##
## Calc is open software; you can redistribute it and/or modify it under
## the terms of the version 2.1 of the GNU Lesser General Public License
## as published by the Free Software Foundation.
##
## Calc is distributed in the hope that it will be useful, but WITHOUT
## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
## or FITNESS FOR A PARTICULAR PURPOSE.	 See the GNU Lesser General
## Public License for more details.
##
## A copy of version 2.1 of the GNU Lesser General Public License is
## distributed with calc under the filename COPYING-LGPL.  You should have
## received a copy with calc; if not, write to Free Software Foundation, Inc.
## 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
##
## @(#) $Revision: 30.1 $
## @(#) $Id: isptr,v 30.1 2007/03/16 11:10:42 chongo Exp $
## @(#) $Source: /usr/local/src/bin/calc/help/RCS/isptr,v $
##
## Under source code control:	1997/09/06 20:03:35
## File existed as early as:	1997
##
## chongo <was here> /\oo/\	http://www.isthe.com/chongo/
## Share and enjoy!  :-)	http://www.isthe.com/chongo/tech/comp/calc/
