lisp
tool
elf
sfttest.c
Go to the documentation of this file.
1
#define intval(p) (((int)(p))>>2)
2
#define makeint(v) ((((int)v)<<2)+2)
3
4
main
()
5
{
6
7
int
x,y,z;
8
x=0xe2345678;
9
y=
makeint
(x);
10
z=
intval
(y);
11
12
printf(
"%x %x %x\n"
, x,y,z);
13
}
14
15
16
makeint
#define makeint(v)
Definition:
sfttest.c:2
intval
#define intval(p)
Definition:
sfttest.c:1
main
main()
Definition:
sfttest.c:4
euslisp
Author(s): Toshihiro Matsui
autogenerated on Thu Jun 15 2023 02:06:43