2 isptr - whether a value is a pointer
10 return 0, 1, 2, 3, or 4
15 0 if x is a not pointer
16 1 if x is an octet-pointer
17 2 if x is a value-pointer
18 3 if x is a string-pointer
19 4 if x is a number-pointer
21 Pointers are initially defined by using the addreess (&) operator
22 with an "addressable" value; currently, these are octets, lvalues,
23 strings and real numbers.
26 ; a = "abc", b = 3, B = blk()
31 ; print isptr(a), isptr(p1), isptr(p2), isptr(p3), isptr(p4)
41 isnum, isstr, isblk, isoctet
43 ## Copyright (C) 1999-2006 Landon Curt Noll
45 ## Calc is open software; you can redistribute it and/or modify it under
46 ## the terms of the version 2.1 of the GNU Lesser General Public License
47 ## as published by the Free Software Foundation.
49 ## Calc is distributed in the hope that it will be useful, but WITHOUT
50 ## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
51 ## or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
52 ## Public License for more details.
54 ## A copy of version 2.1 of the GNU Lesser General Public License is
55 ## distributed with calc under the filename COPYING-LGPL. You should have
56 ## received a copy with calc; if not, write to Free Software Foundation, Inc.
57 ## 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
59 ## @(#) $Revision: 30.1 $
60 ## @(#) $Id: isptr,v 30.1 2007/03/16 11:10:42 chongo Exp $
61 ## @(#) $Source: /usr/local/src/cmd/calc/help/RCS/isptr,v $
63 ## Under source code control: 1997/09/06 20:03:35
64 ## File existed as early as: 1997
66 ## chongo <was here> /\oo/\ http://www.isthe.com/chongo/
67 ## Share and enjoy! :-) http://www.isthe.com/chongo/tech/comp/calc/