view release on metacpan or  search on metacpan

Rsynth.xs  view on Meta::CPAN

     CODE:
#     ifdef RSXS_DEBUG_STRING
       printf("Say_String: got string '%s'\n", val);
#     endif
       say_string(synth,val);
#     ifdef RSXS_DEBUG_STRING
       printf("Say_String: done.\n", val);
#     endif


#//---------------- speak to me streamingly
void
rsxs_Say_File(synth,file)
       rsynth_synth_ptr synth
       FILE *file
     CODE:
#     ifdef RSXS_DEBUG_FILE
       printf("Saying file: %d (stdin=%d)\n", fileno(file),fileno(stdin));
#     endif
       say_file(synth,file);
#     ifdef RSXS_DEBUG_FILE

Rsynth.xs.in  view on Meta::CPAN

     CODE:
#     ifdef RSXS_DEBUG_STRING
       printf("Say_String: got string '%s'\n", val);
#     endif
       say_string(synth,val);
#     ifdef RSXS_DEBUG_STRING
       printf("Say_String: done.\n", val);
#     endif


#//---------------- speak to me streamingly
void
rsxs_Say_File(synth,file)
       rsynth_synth_ptr synth
       FILE *file
     CODE:
#     ifdef RSXS_DEBUG_FILE
       printf("Saying file: %d (stdin=%d)\n", fileno(file),fileno(stdin));
#     endif
       say_file(synth,file);
#     ifdef RSXS_DEBUG_FILE