lang/cem/ctest/ctgen/ll.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         long x=100234 , y= -301 ;
   8 /[XYZS]/s/.*/& ; printf("%s#","&"@) ;/
   9 /Z1/s/#/ %ld&/
  10 /Z1/s/@/, Z1&/
  11 /Z2/s/#/ %ld&/
  12 /Z2/s/@/, Z2&/
  13 /Z1/s/^/Z1 = 10 ; /
  14 /Z2/s/^/Z2 = 0100 ; /
  15 /[XYZS]/s/^/    /
  16 s/X/40000/g
  17 s/Y/30000/g
  18 s/S/9/g
  19 s/Z1/x/g
  20 s/Z2/y/g
  21 s/#/\\n/
  22 s/@//