1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
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 address (&) 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,2021 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.
##
## 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/
|
