RosettaCodeData/Task/Use-another-language-to-call-a-function/Nim/use-another-language-to-call-a-function-2.nim
2023-07-01 13:44:08 -04:00

20 lines
370 B
Nim

#include <stdio.h>
extern int Query (char * Data, size_t * Length);
int main (int argc, char * argv [])
{
char Buffer [1024];
size_t Size = sizeof (Buffer);
if (0 == Query (Buffer, &Size))
{
printf ("failed to call Query\n");
}
else
{
char * Ptr = Buffer;
while (Size-- > 0) putchar (*Ptr++);
putchar ('\n');
}
}