22835dc3a6
* tests/multifnc/t0.prg
* tests/multifnc/t1.prg
* tests/multifnc/t2.prg
* source/rdd/usrrdd/example/exmemo.prg
* source/rdd/usrrdd/example/exhsx.prg
* source/rdd/usrrdd/example/exfcm.prg
* source/rdd/usrrdd/example/exrlx.prg
* contrib/xhb/hbsyslog.c
* contrib/rddado/tests/mysql3.prg
* contrib/rddado/tests/access1.prg
* contrib/rddado/tests/access2.prg
* contrib/rddado/tests/mysql1.prg
* contrib/hbpgsql/tests/tstpgrdd.prg
! SVN headers.
* contrib/hbwhat32/Makefile
* contrib/hbwhat32/common.mak
- contrib/hbwhat32/wintypes.ch
- Removed wintypes.ch, as it collides with a header with
the same name (and similar content) in xhb. It will
now use the xhb one, since it already relied on other
xhb headers anyway.
If anyone wants to sort this out properly, pls do.
35 lines
1.1 KiB
Plaintext
35 lines
1.1 KiB
Plaintext
/*
|
|
* $Id$
|
|
*/
|
|
|
|
proc main2()
|
|
? "main2", procfile("main2"), procfile(@main2())
|
|
? "alert", procfile("alert"), procfile(@alert()), alert()
|
|
? "p0", procfile("p0"), procfile(@p0()), (@p0()):exec(), p0(), t("p0",@p0(),p0(),"t0.prg")
|
|
? "p1", procfile("p1"), procfile(@p1()), (@p1()):exec(), p1(), t("p1",@p1(),p1(),"t0.prg")
|
|
? "p2", procfile("p2"), procfile(@p2()), (@p2()):exec(), p2(), t("p2",@p2(),p2(),"t1.prg")
|
|
? "p3", procfile("p3"), procfile(@p3()), (@p3()):exec(), p3(), t("p3",@p3(),p3(),"t0.prg")
|
|
? "p4", procfile("p4"), procfile(@p4()), (@p4()):exec(), p4(), t("p4",@p4(),p4(),"t1.prg")
|
|
? "p5", procfile("p5"), procfile(@p5()), (@p5()):exec(), p5(), t("p5",@p5(),p5(),"t2.prg")
|
|
? "p6", procfile("p6"), procfile(@p6()), (@p6()):exec(), p6(), t("p6",@p6(),p6(),"t0.prg")
|
|
? "p7", procfile("p7"), procfile(@p7()), (@p7()):exec(), p7(), t("p7",@p7(),p7(),"t1.prg")
|
|
? "==="
|
|
main3()
|
|
return
|
|
|
|
func p1(); return "P1:t1.prg"
|
|
func p2(); return "P2:t1.prg"
|
|
func p3(); return "P3:t1.prg"
|
|
func p4(); return "P4:t1.prg"
|
|
|
|
func alert()
|
|
return "[ALERT]"
|
|
|
|
#pragma begindump
|
|
#include "hbapi.h"
|
|
|
|
HB_FUNC( P7 )
|
|
{
|
|
hb_retc( "P7:t1.prg" );
|
|
}
|
|
#pragma enddump |