Skip to content
Browse files

disallow all null and whitespacey ops

  • Loading branch information...
1 parent e17ff6a commit d38bbd02c17e7469e61354e6cb003b2df0d90e4e @TimToady TimToady committed Nov 17, 2012
Showing with 2 additions and 0 deletions.
  1. +2 −0 CursorBase.pmc
View
2 CursorBase.pmc
@@ -2719,6 +2719,8 @@ sub add_categorical { my $lang = shift;
else {
@list = $mangle;
}
+ $lang->panic('Whitespace is not allowed in an operator') if grep { /\s/ } @list;
+ @list = () if grep { !length } @list;
$mangle = ::mangle(@list);
$mangle = $category . '__S_' . sprintf("%03d",$GEN++) . $mangle;

0 comments on commit d38bbd0

Please sign in to comment.
Something went wrong with that request. Please try again.