Variable Length String Passed from Basic to C (57362)

MORE INFORMATION

For more information about calling C from Basic, search in the Microsoft Knowledge Base on the following word:

Basic to C Example

Compile and link as follows: Use the following link line in Basic PDS for MS-DOS:

BASTEST.BAS

DECLARE SUB StringFar CDECL (BYVAL p1o AS INTEGER, BYVAL p1s AS INTEGER,
SEG p3 AS INTEGER)
CLS
a$ = "This is a test" + CHR$(0)
CALL StringFar(SADD(a$), SSEG(a$), LEN(a$))
FOR i% = 1 TO 18
    PRINT
NEXT
PRINT "Back from C"
END
				

CTEST.C

/* C subprogram */ 
#include <stdio.h>
void StringFar(char far * a, int * len)
{
   int i;
   printf("The string is: %Fs\n", a);
   printf("Index  Value  Character\n");
   for (i = 0; i < *len; i++) {
      printf(" %2d    %3d     %c\n", i, a[i], a[i]);
   }
}