source: trunk/WRF.COMMON/WRFV3/arch/no_file_line.sed @ 3567

Last change on this file since 3567 was 2759, checked in by aslmd, 2 years ago

adding unmodified code from WRFV3.0.1.1, expurged from useless data +1M size

File size: 611 bytes
Line 
1#### This sed script does not pass __FILE__ and __LINE__ to wrf_error_fatal() ####
2#### Use this when the Fortran compiler complains about long source lines,    ####
3#### usually due to cpp translating __FILE__ to a full pathname.              ####
4#
5# get rid of single quotes after comments
6# WARNING:  This will break if a quoted string is followed by a comment that has
7#           a single quote. 
8/\!.*'/s/'//g
9# DO NOT Automatically add cpp __LINE__ and __FILE__ to calls to wrf_error_fatal(). 
10# s/[Cc][Aa][Ll][Ll] *[Ww][Rr][Ff]_[Ee][Rr][Rr][Oo][Rr]_[Ff][Aa][Tt][Aa][Ll] *(/& __FILE__ , __LINE__ , /
Note: See TracBrowser for help on using the repository browser.