diff options
| author | Richard Levitte <levitte@openssl.org> | 2003-03-20 23:51:35 +0000 |
|---|---|---|
| committer | Richard Levitte <levitte@openssl.org> | 2003-03-20 23:51:35 +0000 |
| commit | 37892848074f79f91d71a16eed4d8dcef76a274e (patch) | |
| tree | 62828af097ededde544d20bb3b81097c4f7f53a5 /util/mkdef.pl | |
| parent | be9bec9bc77fdfe81cab9b6312ccdc4817e37938 (diff) | |
| download | openssl-37892848074f79f91d71a16eed4d8dcef76a274e.zip openssl-37892848074f79f91d71a16eed4d8dcef76a274e.tar.gz openssl-37892848074f79f91d71a16eed4d8dcef76a274e.tar.bz2 | |
Sometimes, we have partial comments on the same line as other stuff we
parse. Make sure to read in the whole comment, so it can be entirely
removed.
Diffstat (limited to 'util/mkdef.pl')
| -rwxr-xr-x | util/mkdef.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/util/mkdef.pl b/util/mkdef.pl index 3091e20..dc5b12b 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -448,6 +448,10 @@ sub do_defs } s/\/\*.*?\*\///gs; # ignore comments + if (/\/\*/) { # if we have part + $line = $_; # of a comment, + next; # continue reading + } s/{[^{}]*}//gs; # ignore {} blocks print STDERR "DEBUG: \$def=\"$def\"\n" if $debug && $def ne ""; print STDERR "DEBUG: \$_=\"$_\"\n" if $debug; |