From 77aaee3575adb8923b4af56b40385b5958ea84a5 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 10 Apr 2003 16:59:54 +0000 Subject: better error message ("please remove the space before the function call" instead of "can't handle this nicely") --- perl_checker.src/parser_helper.ml | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/perl_checker.src/parser_helper.ml b/perl_checker.src/parser_helper.ml index fc84b93..570e989 100644 --- a/perl_checker.src/parser_helper.ml +++ b/perl_checker.src/parser_helper.ml @@ -299,7 +299,9 @@ let check_parenthesized_first_argexpr word ((_, e), (_, (start, _)) as ex) = if is_parenthesized e' then if l = [] then (if want_space then sp_n else sp_0) ex - else die_with_rawpos (start, start) "can't handle this nicely" + else + (* eg: join (" ", @l) . "\n" *) + die_with_rawpos (start, start) "please remove the space before the function call" else sp_p(ex) | _ -> -- cgit v1.2.1