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
6402581d
Commit
6402581d
authored
Apr 19, 2016
by
Jerome Hugues
Browse files
* Report error when a theorem is false
parent
30fa0438
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/backends/ocarina-backends-real.adb
View file @
6402581d
...
...
@@ -366,6 +366,10 @@ package body Ocarina.Backends.REAL is
Success
:=
False
;
end
if
;
if
not
Success
then
N_Errors
:=
N_Errors
+
1
;
end
if
;
Write_Line
(
"theorem "
&
Get_Name_String
(
Name
(
Identifier
(
R
)))
&
...
...
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