-
Notifications
You must be signed in to change notification settings - Fork 298
/
Corba_omc.cpp
75 lines (64 loc) · 1.77 KB
/
Corba_omc.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
/*
* This file is part of OpenModelica.
*
* Copyright (c) 1998-2010, Linköpings University,
* Department of Computer and Information Science,
* SE-58183 Linköping, Sweden.
*
* All rights reserved.
*
* THIS PROGRAM IS PROVIDED UNDER THE TERMS OF THIS OSMC PUBLIC
* LICENSE (OSMC-PL). ANY USE, REPRODUCTION OR DISTRIBUTION OF
* THIS PROGRAM CONSTITUTES RECIPIENT'S ACCEPTANCE OF THE OSMC
* PUBLIC LICENSE.
*
* The OpenModelica software and the Open Source Modelica
* Consortium (OSMC) Public License (OSMC-PL) are obtained
* from Linköpings University, either from the above address,
* from the URL: http://www.ida.liu.se/projects/OpenModelica
* and in the OpenModelica distribution.
*
* This program is distributed WITHOUT ANY WARRANTY; without
* even the implied warranty of MERCHANTABILITY or FITNESS
* FOR A PARTICULAR PURPOSE, EXCEPT AS EXPRESSLY SET FORTH
* IN THE BY RECIPIENT SELECTED SUBSIDIARY LICENSE CONDITIONS
* OF OSMC-PL.
*
* See the full OSMC Public License conditions for more details.
*
*/
#include <stdio.h>
#include "corbaimpl.cpp"
extern "C" {
#include "meta/meta_modelica.h"
#include "ModelicaUtilities.h"
extern int Corba_haveCorba()
{
return 1;
}
extern void Corba_setObjectReferenceFilePath(const char* path)
{
CorbaImpl__setObjectReferenceFilePath(path);
}
extern void Corba_setSessionName(const char* _inSessionName)
{
CorbaImpl__setSessionName(_inSessionName);
}
extern const char* Corba_waitForCommand()
{
const char *res = CorbaImpl__waitForCommand();
return strcpy(ModelicaAllocateString(strlen(res)), res);
}
extern void Corba_initialize()
{
if (CorbaImpl__initialize()) MMC_THROW();
}
extern void Corba_close()
{
CorbaImpl__close();
}
extern void Corba_sendreply(const char* _inString)
{
CorbaImpl__sendreply(_inString);
}
}