File: sfttest.c

package info (click to toggle)
euslisp 9.31%2Bdfsg-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 55,448 kB
  • sloc: ansic: 41,610; lisp: 3,339; makefile: 286; sh: 238; asm: 138; python: 53
file content (16 lines) | stat: -rw-r--r-- 181 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
#define intval(p) (((int)(p))>>2)
#define makeint(v) ((((int)v)<<2)+2)

main()
{

  int x,y,z;
  x=0xe2345678;
  y=makeint(x);
  z=intval(y);

  printf("%x %x %x\n", x,y,z);
  }