add some f2c runtime functions, remove exception, avoid name conflict with libgfortran
This commit is contained in:
10
lib/linalg/i_lmp_len.cpp
Normal file
10
lib/linalg/i_lmp_len.cpp
Normal file
@ -0,0 +1,10 @@
|
||||
|
||||
#include "lmp_f2c.h"
|
||||
|
||||
extern "C" {
|
||||
|
||||
integer i_lmp_len(char *s, ftnlen n)
|
||||
{
|
||||
return (n);
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user