OLD | NEW |
1 # Test step/next in presence of #line directives | 1 # Test step/next in presence of #line directives |
2 # Copyright 2001, 2007-2012 | 2 # Copyright (C) 2001, 2007, 2012 |
3 # Free Software Foundation, Inc. | 3 # Free Software Foundation, Inc. |
4 | 4 |
5 # This program is free software; you can redistribute it and/or modify | 5 # This program is free software; you can redistribute it and/or modify |
6 # it under the terms of the GNU General Public License as published by | 6 # it under the terms of the GNU General Public License as published by |
7 # the Free Software Foundation; either version 3 of the License, or | 7 # the Free Software Foundation; either version 3 of the License, or |
8 # (at your option) any later version. | 8 # (at your option) any later version. |
9 # | 9 # |
10 # This program is distributed in the hope that it will be useful, | 10 # This program is distributed in the hope that it will be useful, |
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 11 # but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
(...skipping 19 matching lines...) Expand all Loading... |
32 j = i; | 32 j = i; |
33 j = SUCC (j); | 33 j = SUCC (j); |
34 j = j - i; | 34 j = j - i; |
35 RETURN (j); | 35 RETURN (j); |
36 END | 36 END |
37 | 37 |
38 BEGIN | 38 BEGIN |
39 VARIABLE i : INTEGER;; | 39 VARIABLE i : INTEGER;; |
40 | 40 |
41 END | 41 END |
OLD | NEW |