public
/
Ack-5.5.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Pristine Ack-5.5
[Ack-5.5.git]
/
lang
/
cem
/
ctest
/
ctgen
/
ld.sed
1
1i\
2
#ifndef NOFLOAT
3
/LSTART/d
4
s/FN/main/
5
/ISTART/c\
6
double 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