Introduce STR_WITH_LEN macro in the form suggested by Chip.

p4raw-id: //depot/perl@26635

1 files changed, 3 insertions, 0 deletions

diff --git a/handy.h b/handy.h
index 6c87f9137e..b587ea5361 100644
--- a/handy.h
+++ b/handy.h
@@ -236,6 +236,9 @@ typedef U64TYPE U64;
 
 #define Ctl(ch) ((ch) & 037)
 
+/* concatenating with "" ensures that only literal strings are accepted as agument */
+#define STR_WITH_LEN(s)  (s ""), (sizeof(s)-1)
+
 /*
 =head1 Miscellaneous Functions