| /* |
| This test makes sure that flang's runtime does not depend on the C++ runtime |
| library. It tries to link this simple file against libFortranRuntime.a with |
| a C compiler. |
| |
| REQUIRES: c-compiler |
| |
| RUN: %cc -std=c99 %s -I%include %libruntime %libdecimal -lm -o /dev/null |
| */ |
| |
| #include "flang/Runtime/entry-names.h" |
| #include <stdint.h> |
| |
| /* |
| Manually add declarations for the runtime functions that we want to make sure |
| we're testing. We can't include any headers directly since they likely contain |
| C++ code that would explode here. |
| */ |
| struct Descriptor; |
| |
| double RTNAME(CpuTime)(); |
| |
| void RTNAME(ProgramStart)(int, const char *[], const char *[]); |
| int32_t RTNAME(ArgumentCount)(); |
| int32_t RTNAME(ArgumentValue)( |
| int32_t, const struct Descriptor *, const struct Descriptor *); |
| int64_t RTNAME(ArgumentLength)(int32_t); |
| |
| int main() { |
| double x = RTNAME(CpuTime)(); |
| RTNAME(ProgramStart)(0, 0, 0); |
| int32_t c = RTNAME(ArgumentCount)(); |
| int32_t v = RTNAME(ArgumentValue)(0, 0, 0); |
| int32_t l = RTNAME(ArgumentLength)(0); |
| return x + c + l; |
| } |