Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

Ïò¸ßÊÖÇë½Ìfortran µ÷ÓÃC µÄÎÊÌâ

ÎÒÏÖÔÚҪЩһ¸öfortranµ÷ÓÃC½Ó¿ÚµÄÎÊÌ⣬µ«ÊDz»ÖªµÀ CÓïÑÔÀïÃæ·ÖÅäµÄÖ¸ÕëÔõô¸¶¸øfortran,ÓÖ²»ÄÜÔÚfortranÁ¢ÂíÏÈ·ÖÅäºÃ£¬ÒµÎñÉϲ»ÔÊÐí¡£
ÎÒдÁ˸ö²âÊÔµÄÀý×Ó¡£µ«ÊDz»ÐС£


test.c
#include <stdio.h>
#include <string.h>
#include <malloc.h>
#include <stdlib.h>

int itest_(char **p)
{
  *p = (char*) malloc(sizeof(char) * 18);
  sprintf(*p,"%s","gbcd");
  return 1;
}


test.F90
program main
   
  interface  
  integer function itest(pchar)
  CHARACTER,pointer::pchar(:)
   
  end function
  end interface 
   




  CHARACTER ,pointer:: pchar(:)
  integer iout
  CHARACTER ac
  CHARACTER ab,ad
   
  iout = itest(pchar)
  ac=pchar(1)
  ab=pchar(2)
  ad=pchar(3)
  write(*,*)ac
  write(*,*)ab
  write(*,*)ad

  end program
   
µ«ÊÇÔËÐнá¹ûÊÇ
g
g
g

Çë¸ßÊÖ°ïæ¡£
°ï¶¥~~

¶¥


Ïà¹ØÎÊ´ð£º

ÓÃc/c++¶¨Î»É¾³ýÒ»ÐеÄÎÊÌâ

ÓÃc/c++¶¨Î»É¾³ýÒ»ÐеÄÎÊÌâ¡£

ÎÊÌâ±³¾°£º

ËùÐèÊý¾ÝÏ൱´ó¡£aÓëbÎļþ¾ùΪһ×éÎļþ£¨a1£¬a2¡­£¬b1£¬b2¡­£©£¬aÎļþÓÐ×î´óÊý¾ÝÐÐÊý£¨Èç5000£©£¬ÒÔÐеÄÐÎʽ£¬´ÓaÎļþÖжÁÈ¡Êý¾Ý£¬½«aÖв»ÄÜ´¦ÀíµÄÊý¾Ý·ÅÔÚbÎ ......

c#¿ØÖÆMysql ʵÏÖ×Ô¶¯É¾³ý¹¦ÄÜ - .NET¼¼Êõ / C#

Óиöwinform³ÌÐò,ʹÓÃc#+mysql,ÐèÒªÔÚÒ»¸ö´°ÌåÉèÖÃmysql×Ô¶¯É¾³ý¹¦ÄÜ,°üÀ¨×Ô¶¯É¾³ý¶àÉÙÌì֮ǰµÄÊý¾ÝÒÔ¼°ÊÇ·ñ¿ªÆô×Ô¶¯É¾³ý¹¦ÄÜ,ÎÒ³ÌÐòÍ˳öºó,»¹Ôõô¿ØÖÆMysql×Ô¼ºÉ¾³ý°¡?ÊDz»ÊÇÒªÓÃmysqlµÄeventÀ´ÊµÏÖ?c#¿ÉÒÔµ÷ÓÃmysq ......

C ³ÌÐòÎÊÌâ (Èý) - C/C++ / CÓïÑÔ

ÎÊÌâÒ»£º
ÔÚ¶ÔÆëΪ4µÄÇé¿öÏÂ
struct BBB
{
long num£»
char *name;
short int data;
char ha;
short ba[5];
}*p;
p=0x1000000;
p+0x200=____;
(Ulong)p+0x200=____;
(char*)p+0x200=____;
¼ÙÉèÔÚ32λC ......

<c:forEach Êä³öSet¼¯ºÏµÄÎÊÌâ

<table width="100%" border="1" cellpadding="0" cellspacing="0">
  <c:forEach items="${quaeres}" var="q"> 
......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ