Passing a FORTRAN object to C and vice versa -

-

मेरे पास मेरा फ़ॉर्तोरन ऑब्जेक्ट है 

  यह% ऑब्जेक्ट% a this% object% b यह% ऑब्जेक्ट% c

मैं इसे सी में लिखे गए कोड में देना चाहता हूं, मैं एक फोरट्रान प्रोग्रामर हूं और मुझे सी के साथ बहुत कम जोखिम मिला है। मैं Iso_c_binding पूर्णांक और सरणियों को पार करने के लिए, लेकिन अब मुझे ऑब्जेक्ट पास करना होगा

मैं निम्नलिखित वस्तु में ऑब्जेक्ट को परिभाषित करता हूं 

  TYPE ऑब्जेक्ट INTEGER :: एक INTEGER :: b INTEGER :: c end TYPE ऑब्जेक्ट
"post-text" itemprop = "text">

आप इंटरऑपरेट करने योग्य प्रकार कर सकते हैं: 

  का उपयोग करें iso_c_binding प्रकार, BIND (सी): : ऑब्जेक्ट INTEGER (c_int) :: एक INTEGER (c_int) :: बी INTEGER (c_int) :: सी एंड प्रकार ऑब्जेक्ट प्रकार (वस्तु) :: ओ

मानक में प्रतिबंध हैं ऑब्जेक्ट पर उदाहरण के लिए, इसमें ऑलोकेटेबल या पॉइंटर घटकों को शामिल नहीं किया जा सकता है।

जब आप इसे एक इंटरऑपरेबल प्रक्रिया में पास करते हैं: 

  शून्य उप (c_object * x) {} सबस्ट्रैनेट उप (x (सी, नाम = "उप") प्रकार (ऑब्जेक्ट), आशय (अंतराल) :: एक्स एंड सबराउटिन कॉल उप (ओ)

यह एक सी स्ट्रक्चर के साथ इंटरऑपरेट है

<पूर्व> टाइपिंगफ़ाइल संरचना {int a; Int b; Int c; } C_object; आप गैर-इंटरऑपरेट करने वाले प्रकारों को सी में भी पारित कर सकते हैं, लेकिन आपको पॉइंटर्स का उपयोग करना है: 
  सब-रूटिन सब 2 (x) बाइंड (सी, नाम = "उप") प्रकार (c_ptr), मान :: एक्स अंत सब-रूटिन कॉल उप 2 (लोक (ओ))

Comments

Post a Comment

Popular posts from this blog

java - Can't add JTree to JPanel of a JInternalFrame -

-
Image
There are two panels in my JInternalframe. I want to add TopPanel to Jtree to nominate another. But I can not add Jaitari to the top of the panel. Please help me in this piece of code: DefaultMutableTreeNode root = new DefaultMutableTreeNode ("deck"); DefaultMutableTreeNode Item Clubs = New DefaultMutableTreeNode ("Club"); AddAllCard (itemClubs); Root.add (itemClubs); DefaultMutableTreeNode item = New DefaultMutableTreeNode ("Diamonds"); AddAllCard (itemDiamonds); Root.add (itemDiamonds); DefaultMutableTreeNode Itemspads = New DefaultMutableTreeNode ("Spades"); AddAllCard (itemSpades); Root.add (itemSpades); DefaultMutableTreeNode item increases = new DefaultMutableTreeNode ("heart"); AddAllCard (itemHearts); Root.add (itemHearts); Default Trimodel Tree Model = New DefaultTreeModel (Route); Tree = new jetty (tree modal); ScrollPane = new JScrollPane (tree); // scrollPane.setViewportView (tree); . ScrollPane.getViewport () add (tr...
Read more

c++ - Qt-how to convert a QByteArray to struct -

-
I need to convert a QByteArray into a structure. I have such a structure: struct mavlink_attitude_t {/// & lt; Summary & gt; Timestamp (millisecond from system boot) & lt; / Summary & gt; Quint 32 Time_boot_ms; /// & lt; Summary & gt; Roll angle (rad, -pi .. + pi) & lt; / Summary & gt; Float roll; /// & lt; Summary & gt; Pitch angle (red, -p + + pi) & lt; / Summary & gt; Boat pitch; /// & lt; Summary & gt; Angle of O (Red, -P. + Pi) & lt; / Summary & gt; Float yao; /// & lt; Summary & gt; Angular Speed ​​Roll (Rod / S) & lt; / Summary & gt; Float rollspeed; /// & lt; Summary & gt; Pitch angular momentum (rad / s) & lt; / Summary & gt; Float pitchspid; /// & lt; Summary & gt; Yoga's angular momentum (RD / S) & lt; / Summary & gt; Float Yspeed; }; And I come from a Quetbeat Serial Port. I was already using the union but I think it can not be used for QByteArray, i...
Read more

c++ - What exceptions does boost mapped_file_source throw? -

-
Boost map_file_source, for example, throws an exception file not found. Is the exception square really throwing it? It does not seem to say in the documentation, unless I miss something. Edit: Test case: #include & lt; Boost / iostreams / device / mapped_file.hpp & gt; Int main (int argc, char ** argv) {boost :: iostreams :: mapped_file_source file; File.open (argv [1]); Return 0; If mapping fails, code mapped_handle_ = :: CreateFileMappingA (handle_, NULL, defense, 0, 0, zero); If (mapped_handle_ == NULL) cleanup_and_throw ("failed to create mapping"); Eventually will boost: iostreams :: detail :: throw_system_failure (msg); i.e. Sub-class of std :: exception In this case, it is std :: ios :: failure : BOOST_IOSTREAMS_FAILURE should be std :: ios_base :: Failure to expand, and otherwise the std :: exception for the appropriate derived class. Reference:
Read more