Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Fixed a bug of check_indent()

  • Loading branch information...
commit 95f4af5820afa4443358d7ab8586b32de9cf88f6 1 parent 5344490
nineties authored
Showing with 2 additions and 1 deletion.
  1. +2 −1  rowl1/rowl1-packrat.rlc
View
3  rowl1/rowl1-packrat.rlc
@@ -2,7 +2,7 @@
; rowl - 1st generation
; Copyright (C) 2010 nineties
;
-; $Id: rowl1-packrat.rlc 2013-03-08 17:07:53 nineties $
+; $Id: rowl1-packrat.rlc 2013-03-08 22:08:02 nineties $
;
(import "rlvm-compile")
@@ -520,6 +520,7 @@
(fun check_indent (p) (
(if (field_get p 7) (return @C_TRUE))
+ (if (< (lookahead p) 0) (return @C_TRUE))
(if (<= (field_get p 9) (field_get p 10))
(return @C_FALSE)
Please sign in to comment.
Something went wrong with that request. Please try again.