9687850865
* (all files)
* stripped svn header
* minor cleanups
; use following command to find out the history of files:
git log
git log --follow
git blame
git annotate
22 lines
446 B
Plaintext
22 lines
446 B
Plaintext
/*
|
|
* Harbour Project source code:
|
|
* new Hb_inLine {} test
|
|
*
|
|
* Copyright 2006 Przemyslaw Czerpak <druzus / at / priv.onet.pl>
|
|
* www - http://harbour-project.org
|
|
*
|
|
*/
|
|
|
|
proc main()
|
|
local hb_inLine := " (var) "
|
|
|
|
? hb_inLine { hb_retc("inLine"); } + hb_inLine(" parameter ") {
|
|
hb_retc( hb_parc( 1 ) );
|
|
} + "!" + hb_inLine + hb_inLine() { hb_retc( ":-)" ); } + ;
|
|
hb_inLine() + "{}"
|
|
|
|
return
|
|
|
|
function hb_inLine()
|
|
return " func() "
|