Program AsmNames;

Var
  { This was:
    S: static String ( 10 ); asmname 'S';
    But I don't think this has to work. `static' for global
    declarations is a C thing, anyway, so why would someone use it
    in Pascal, in particular together with an asmname? -- Frank }
  S: String ( 10 ); asmname 'S';
  OK: String ( 10 ); asmname 'S'; external;

Procedure puts ( C: CString ); AsmName 'puts';

begin
  S:= 'OK';
  puts ( OK );
end.
