piteqiu 发表于 2005-3-21 11:20:19

请教:cvf65编译问题

Warning: Because of COMMON, the alignment of object is inconsistent with its type   
type(segmenttype) :: segment(0:n_segment_max)
请教是什么问题?小弟是初学者,有可能问的问题很幼稚,望大家见谅,谢谢!!

freepu 发表于 2005-3-21 11:28:48

Re:请教:cvf65编译问题

既然说到COMMON,就查查COMMON在各个子程序之间是否一致。

piteqiu 发表于 2005-3-21 12:51:05

Re:请教:cvf65编译问题

我的common是在子程序comm.f90里的,子程序中调用comm.f90.type(segmenttype) :: segment(0:n_segment_max)

common /comm_input/b_slab,s_slab,r0_slab &
   ,l_bender,h_bender,alf_bender,phi_bender,dy_bender,dz_bender &
   ,l_straig,h_straig,alf_straig,phi_straig,dy_straig,dz_straig &
   ,height_v,length_h,length_caster &
   ,height_mould,z_meniscus,vc,ks &
   ,l0_roller,roller_gap_inner_min &
   ,roller_stress_max,strand_strain_max,def_roller_max &
   ,d_footroller,pitch_footroller &
   ,a_creep,g_creep,qc_creep &
   ,tmp_target,s_target,t_target &
   ,d_idler_segment,d_driver_segment,pi_segment,p1_segment,pd_segment &
   ,y_ot,z_ot,l_ot,y_it,z_it,l_it &
   ,ord,ird,y_orc,z_orc,y_irc,z_irc,pitch_arc,pitch_or,pitch_ir &
   ,gap_or,gap_ir,pitch_table &
   ,n_roller,ntarget,n_segment,n_segment_bow,niter_alf &
   ,n_creep &
   ,nroller_segment,idriver_segment &
   ,cp_segment,drive_roller,section_roller &
   ,segment

hillyuan 发表于 2005-3-22 11:27:15

Re:请教:cvf65编译问题

选用设定 /alignment:sequence 即可

piteqiu 发表于 2005-3-23 13:06:41

Re:请教:cvf65编译问题

谢谢!!但是想问一下:怎么选用设定 /alignment:sequence?再次感谢!!

hillyuan 发表于 2005-3-23 14:08:12

Re:请教:cvf65编译问题

菜单Project Setting -> FORTRAN: Project Option 内添加/alignment:sequence.
该警告可能影响计算速度,但一般不会导致错误结果。

piteqiu 发表于 2005-3-23 14:48:41

Re:请教:cvf65编译问题

老大,又有新问题了:
--------------------Configuration: reaction_force - Win32 Debug--------------------
Compiling Fortran...
D:\lhb\roller_layout\files\source\comm.f90
D:\lhb\roller_layout\files\source\comm.f90(428) : Error: Syntax error, found END-OF-FILE when expecting one of: <LABEL> <END-OF-STATEMENT> ; BLOCK BLOCKDATA PROGRAM TYPE COMPLEX BYTE CHARACTER ...
integer i,j,k,l
---------------^
Error executing df.exe.

comm.obj - 1 error(s), 0 warning(s)
这个程序别人调好的了,但在我这里怎么就是通不过呢??
页: [1]
查看完整版本: 请教:cvf65编译问题