Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
TASTE
Ocarina
Commits
3c49520a
Commit
3c49520a
authored
Aug 02, 2015
by
yoogx
Browse files
* When scanning for an identifier, ensure we are still in the
boundaries of the buffer Fix for issue #47
parent
e656306b
Changes
4
Hide whitespace changes
Inline
Side-by-side
src/frontends/aadl/ocarina-fe_aadl-lexer.adb
View file @
3c49520a
...
...
@@ -379,8 +379,9 @@ package body Ocarina.FE_AADL.Lexer is
Display_Name_Buffer
(
Display_Name_Len
)
:=
Buffer
(
Token_Location
.
Scan
);
Token_Location
.
Scan
:=
Token_Location
.
Scan
+
1
;
while
Is_Identifier_Character
(
Buffer
(
Token_Location
.
Scan
))
loop
while
Token_Location
.
Scan
<=
Token_Location
.
EOF
and
then
Is_Identifier_Character
(
Buffer
(
Token_Location
.
Scan
))
loop
Add_Char_To_Name_Buffer
(
To_Lower
(
Buffer
(
Token_Location
.
Scan
)));
Display_Name_Len
:=
Display_Name_Len
+
1
;
...
...
tests/MANIFEST
View file @
3c49520a
...
...
@@ -289,5 +289,6 @@ tests/github/issue_22/p.aadl
tests/github/issue_35/test.aadl
tests/github/issue_36/test.aadl
tests/github/issue_39/pb1.aadl
tests/github/issue_47/test.aadl
tests/root_system/test.aadl
tests/github/issue_47/test.aadl
0 → 100644
View file @
3c49520a
package
test
public
system
s
end
s
;
end
test
\ No newline at end of file
tests/github/issue_47/test.aadl.out
0 → 100644
View file @
3c49520a
test.aadl:6:09: parsing Package_Specification, token ';' is expected, found [EOF]
Cannot parse AADL specifications
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment