Files
harbour-core/harbour/samples/cccppc/crlf.prg
1999-11-09 01:37:27 +00:00

26 lines
633 B
Plaintext
Raw Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
/*
* $Id$
*/
//*******************************************************************
// crlf.prg: crlf() function for linking in non CCC environment.
// 1999, Levente Csisz r
//*******************************************************************
#ifndef _CCC_
//*******************************************************************
function crlf()
return chr(13)+chr(10)
//*******************************************************************
#else
//*******************************************************************
static function dummy()
return nil
//*******************************************************************
#endif