X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Fparser_scan.re;h=f280b86ba03f4491d75cdc5b00ff816a8d7cd2b4;hp=f4ae1fdcd9c566e26625c0272f8ef1a6e82b6002;hb=44bd65fe60fb83fa4c3bbb0d4c679d2b70a096df;hpb=cd0567b4052ee24259bc6b8a9858af9d26f3de48

diff --git a/src/parser_scan.re b/src/parser_scan.re
index f4ae1fd..f280b86 100644
--- a/src/parser_scan.re
+++ b/src/parser_scan.re
@@ -53,10 +53,10 @@ size_t psi_parser_maxfill(void) {
 		token = psi_token_init(t, tok, cur - tok, tok - eol + 1, I->lines, I->file); \
 	} \
 	tokens = psi_plist_add(tokens, &token); \
-	psi_debug_lock(PSI_DATA(P)); \
-	PSI_DEBUG_PRINT(P, "PSI: scanned < "); \
-	PSI_DEBUG_DUMP(P, psi_token_dump, token); \
-	psi_debug_unlock(PSI_DATA(P)); \
+	PSI_DEBUG_LOCK(P, \
+			PSI_DEBUG_PRINT(P, "PSI: scanned < "); \
+			PSI_DEBUG_DUMP(P, psi_token_dump, token); \
+	); \
 } while(0)
 
 #define CHECKEOF() if (cur >= lim - YYMAXFILL) goto done