1 files changed, 33 insertions, 0 deletions
diff --git a/tdecore/tests/KIDLTest.cpp b/tdecore/tests/KIDLTest.cpp
new file mode 100644
index 000000000..a763f85c8
--- /dev/null
+++ b/tdecore/tests/KIDLTest.cpp
@@ -0,0 +1,33 @@
+#include "KIDLTest.h"
+
+#include <kapplication.h>
+#include <dcopclient.h>
+
+KIDLTest::KIDLTest( const TQCString& id )
+    : DCOPObject( id )
+{
+}
+
+TQString KIDLTest::hello( const TQString& name )
+{
+    qDebug("Du heter %s", name.latin1() );
+    qDebug("Ha det %s", name.latin1() );
+	
+    return TQString("Jeg heter KIDLTest");
+}
+
+int main( int argc, char** argv )
+{
+    KApplication app( argc, argv, "kidlservertest", false /* No GUI */ );
+
+    app.dcopClient()->attach();
+    app.dcopClient()->registerAs( "kidlservertest" );
+
+    qDebug("Server process started...");
+
+    (void) new KIDLTest( "Hello" );
+
+    qDebug("Server listening ...");
+
+    return app.exec();
+}