From: Dr. Stephen Henson Date: Tue, 20 Jan 2015 18:53:56 +0000 (+0000) Subject: Add -d debug option to save preprocessed files. X-Git-Tag: OpenSSL_1_0_1-post-reformat~9 X-Git-Url: https://git.openssl.org/?p=openssl.git;a=commitdiff_plain;h=fbfad23f0c7c06e60525421e7b409ab580dd8626 Add -d debug option to save preprocessed files. Reviewed-by: Tim Hudson --- diff --git a/util/openssl-format-source b/util/openssl-format-source index 30d50f8b58..4e90147434 100755 --- a/util/openssl-format-source +++ b/util/openssl-format-source @@ -30,6 +30,7 @@ VERBOSE=false DONT=false STOPARGS=false COMMENTS=false +DEBUG="" # for this exercise, we want to force the openssl style, so we roll # our own indent profile, which is at a well known location @@ -56,6 +57,8 @@ do continue;; -nc) COMMENTS="true"; continue;; + -d) DEBUG='eval tee "$j.pre" |' + continue;; esac fi @@ -120,7 +123,7 @@ do -e '/ASN1_(ITEM_ref|ITEM_ptr|ITEM_rptr|PCTX)/ || s/^((ASN1|ADB)_[^\*]*[){=,]+[ \t]*)$/\/**INDENT-OFF**\/\n$1/;' \ -e 's/^(} (ASN1|ADB)_[^\*]*[\){=,;]+)$/$1\n\/**INDENT-ON**\//;' \ | \ - indent $INDENT_ARGS | \ + $DEBUG indent $INDENT_ARGS | \ perl -np \ -e 's/^([ \t]*)\/\*-(.*)\*\/[ \t]*$/$1\/*$2*\//;' \ -e 's/^\/\*-((Copyright|=|----).*)$/\/* $1/;' \