lang/cem/ctest/ctgen/lf.sed

   1 1i\
   2 #ifndef NOFLOAT
   3 /ISTART/d
   4 s/FN/main/
   5 /LSTART/c\
   6         float x=3.1415 , y= 1e-7 ;
   7 /[^&]& /d
   8 /[^|]| /d
   9 />>/d
  10 /<</d
  11 /%/d
  12 /\^/d
  13 /~/d
  14 /&=/d
  15 /|=/d
  16 /[XYZS]/s/.*/& ; printf("%s#","&"@) ;/
  17 /Z1/s/#/ %e&/
  18 /Z1/s/@/, Z1&/
  19 /Z2/s/#/ %e&/
  20 /Z2/s/@/, Z2&/
  21 /Z1/s/^/Z1 = 3.1415 ; /
  22 /Z2/s/^/Z2 = 1e-7 ; /
  23 /[XYZS]/s/^/    /
  24 s/X/.4e-5/g
  25 s/Y/.3e-5/g
  26 s/Z1/x/g
  27 s/Z2/y/g
  28 s/#/\\n/
  29 s/@//
  30 $a\
  31 #else\
  32 main() { return 0; }\
  33 #endif