(impc:aot:do-or-emit
(call-as-xtlang
(set! MPI_DATATYPE_NULL ompi_mpi_datatype_null_addr)
(set! MPI_BYTE ompi_mpi_byte_addr)
(set! MPI_PACKED ompi_mpi_packed_addr)
(set! MPI_CHAR ompi_mpi_char_addr)
(set! MPI_SHORT ompi_mpi_short_addr)
(set! MPI_INT ompi_mpi_int_addr)
(set! MPI_LONG ompi_mpi_long_addr)
(set! MPI_FLOAT ompi_mpi_float_addr)
(set! MPI_DOUBLE ompi_mpi_double_addr)
(set! MPI_LONG_DOUBLE ompi_mpi_long_double_addr)
(set! MPI_UNSIGNED_CHAR ompi_mpi_unsigned_char_addr)
(set! MPI_SIGNED_CHAR ompi_mpi_signed_char_addr)
(set! MPI_UNSIGNED_SHORT ompi_mpi_unsigned_short_addr)
(set! MPI_UNSIGNED_LONG ompi_mpi_unsigned_long_addr)
(set! MPI_UNSIGNED ompi_mpi_unsigned_addr)
(set! MPI_WCHAR ompi_mpi_wchar_addr)
(set! MPI_LONG_LONG_INT ompi_mpi_long_long_int_addr)
(set! MPI_LONG_LONG ompi_mpi_long_long_int_addr)
(set! MPI_UNSIGNED_LONG_LONG ompi_mpi_unsigned_long_long_addr)))
(impc:aot:insert-forms
(call-as-xtlang
(set! MPI_DATATYPE_NULL ompi_mpi_datatype_null_addr)
(set! MPI_BYTE ompi_mpi_byte_addr)
(set! MPI_PACKED ompi_mpi_packed_addr)
(set! MPI_CHAR ompi_mpi_char_addr)
(set! MPI_SHORT ompi_mpi_short_addr)
(set! MPI_INT ompi_mpi_int_addr)
(set! MPI_LONG ompi_mpi_long_addr)
(set! MPI_FLOAT ompi_mpi_float_addr)
(set! MPI_DOUBLE ompi_mpi_double_addr)
(set! MPI_LONG_DOUBLE ompi_mpi_long_double_addr)
(set! MPI_UNSIGNED_CHAR ompi_mpi_unsigned_char_addr)
(set! MPI_SIGNED_CHAR ompi_mpi_signed_char_addr)
(set! MPI_UNSIGNED_SHORT ompi_mpi_unsigned_short_addr)
(set! MPI_UNSIGNED_LONG ompi_mpi_unsigned_long_addr)
(set! MPI_UNSIGNED ompi_mpi_unsigned_addr)
(set! MPI_WCHAR ompi_mpi_wchar_addr)
(set! MPI_LONG_LONG_INT ompi_mpi_long_long_int_addr)
(set! MPI_LONG_LONG ompi_mpi_long_long_int_addr)
(set! MPI_UNSIGNED_LONG_LONG ompi_mpi_unsigned_long_long_addr)))