Performance optimisation in assert, suggested by Tim Bunce

Most compilers will store only a single copy of identical literal
strings. So changing that assert to check the pointer first would
significantly reduce the cost.

diff --git a/scope.h b/scope.h
index 9fd3bce..2f50398 100644 (file)
--- a/scope.h
+++ b/scope.h
@@ -140,7 +140,9 @@ scope has the given name. Name must be a literal string.
 #define LEAVE_with_name(name)                                          \
     STMT_START {                                                       \
        DEBUG_SCOPE("LEAVE \"" name "\"")                               \
-       assert(strEQ(PL_scopestack_name[PL_scopestack_ix-1], name));    \
+       assert(((char*)PL_scopestack_name[PL_scopestack_ix-1]           \
+                   == (char*)name)                                     \
+               || strEQ(PL_scopestack_name[PL_scopestack_ix-1], name));        \
        pop_scope();                                                    \
     } STMT_END
 #else