Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
TASTE
OpenGEODE
Commits
269cf0a5
Commit
269cf0a5
authored
Oct 04, 2015
by
Maxime Perrotin
Browse files
Generate Ada file in lowercases
parent
5eda64b9
Changes
2
Hide whitespace changes
Inline
Side-by-side
opengeode/AdaGenerator.py
View file @
269cf0a5
...
...
@@ -71,6 +71,7 @@
import
logging
import
traceback
import
os
from
singledispatch
import
singledispatch
import
ogAST
...
...
@@ -638,11 +639,11 @@ package {process_name} is'''.format(process_name=process_name,
ads_template
.
append
(
'end {process_name};'
.
format
(
process_name
=
process_name
))
with
open
(
process_name
+
'
.
adb'
,
'w'
)
as
ada_file
:
with
open
(
process_name
.
lower
()
+
os
.
extsep
+
'adb'
,
'w'
)
as
ada_file
:
ada_file
.
write
(
u
'
\n
'
.
join
(
format_ada_code
(
taste_template
)).
encode
(
'latin1'
))
with
open
(
process_name
+
'
.
ads'
,
'w'
)
as
ada_file
:
with
open
(
process_name
.
lower
()
+
os
.
extsep
+
'ads'
,
'w'
)
as
ada_file
:
ada_file
.
write
(
u
'
\n
'
.
join
(
format_ada_code
(
ads_template
)).
encode
(
'latin1'
))
...
...
tests/regression/test-nocif2/Makefile
View file @
269cf0a5
...
...
@@ -12,7 +12,7 @@ test-ada:
$(OPENGEODE)
DemoDeviceDSAP_fixed.pr
--toAda
$(ASN1SCC)
-Ada
dv.asn
-typePrefix
asn1Scc
-equal
$(GNATMAKE)
-O
$(O)
-c
*
.adb
$(GNATBIND)
-n
D
emo
DeviceDSAP_fixed
.ali
$(GNATBIND)
-n
d
emo
demodevicedsap
.ali
test-c
:
$(OPENGEODE)
DemoDeviceDSAP_fixed.pr
--toC
...
...
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