diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

drop comment levels.

Browse Source
This commit is contained in:
Vítor Santos Costa 2012-03-04 15:28:04 +00:00
parent fbe846e74a
commit b02d34e400
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
os/pl-read.c
View File

@ -602,10 +602,13 @@ raw_read2(ReadData _PL_rd ARG_LD)
discardBuffer(cbuf);
setErrorLocation(pos, _PL_rd);
rawSyntaxError("end_of_file_in_block_comment");
#ifndef __YAP_PROLOG__
/* YAP does not support comment levels in original scanner */
case '*':
if ( last == '/' )
level++;
break;
#endif
case '/':
if ( last == '*' &&
(--level == 0 || _PL_rd->strictness) )