diff options
Diffstat (limited to 'src/ortho/gcc/ortho_gcc.ads')
| -rw-r--r-- | src/ortho/gcc/ortho_gcc.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/ortho/gcc/ortho_gcc.ads b/src/ortho/gcc/ortho_gcc.ads index d5cbf51c1..0c1ee81b6 100644 --- a/src/ortho/gcc/ortho_gcc.ads +++ b/src/ortho/gcc/ortho_gcc.ads @@ -313,6 +313,7 @@ package Ortho_Gcc is -- Allowed conversions are: -- FIXME: to write. function New_Convert_Ov (Val : O_Enode; Rtype : O_Tnode) return O_Enode; + function New_Convert (Val : O_Enode; Rtype : O_Tnode) return O_Enode; -- Get the address of LVALUE. -- ATYPE must be a type access whose designated type is the type of LVALUE. @@ -610,6 +611,7 @@ private pragma Import (C, New_Compare_Op); pragma Import (C, New_Convert_Ov); + pragma Import (C, New_Convert); pragma Import (C, New_Alloca); pragma Import (C, New_Signed_Literal); |