lang/cem/ctest/ctgen/lu.sed

   1 1i\
   2  /*  ops is converted into a test program for longs \
   3 */
   4 /ISTART/d
   5 s/FN/main/
   6 /LSTART/c\
   7         unsigned x=40234 , y= 301 , z= 30 ;
   8 /[XYZS]/s/.*/& ; printf("%s#","&"@) ;/
   9 /Z1/s/#/ %d&/
  10 /Z1/s/@/, Z1&/
  11 /Z2/s/#/ %d&/
  12 /Z2/s/@/, Z2&/
  13 /Z1/s/^/Z1 = 10 ; /
  14 /Z2/s/^/Z2 = 0100 ; /
  15 /[XYZS]/s/^/    /
  16 s/X/x/g
  17 s/Y/8012/g
  18 s/S/9/g
  19 s/Z1/z/g
  20 s/Z2/y/g
  21 s/#/\\n/
  22 s/@//