lang/cem/ctest/ctgen/ec.sed

   1 1i\
   2  /*  ops is converted into a test program for local characters \
   3 */
   4 /LSTART/d
   5 s/FN/main/
   6 /ISTART/c\
   7         char x=10 , y= 0100 ;
   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/'0'/g
  17 s/Y/'1'/g
  18 s/S/4/g
  19 s/Z1/x/g
  20 s/Z2/y/g
  21 s/#/\\n/
  22 s/@//