--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/textrendering/texthandling/spml/T_PMAIN.CPP	Fri Jun 04 10:37:54 2010 +0100
@@ -0,0 +1,99 @@
+/*
+* Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).
+* All rights reserved.
+* This component and the accompanying materials are made available
+* under the terms of "Eclipse Public License v1.0"
+* which accompanies this distribution, and is available
+* at the URL "http://www.eclipse.org/legal/epl-v10.html".
+*
+* Initial Contributors:
+* Nokia Corporation - initial contribution.
+*
+* Contributors:
+*
+* Description: 
+* Main
+*
+*/
+
+
+#include <T_PMLPAR.H>
+#include <T_RTPAR.H>
+#include <E32TWIN.H>
+
+
+TInt E32Main()
+	{
+	__UHEAP_MARK;
+	CTrapCleanup* cleanup=CTrapCleanup::New();
+
+	// create console
+	RConsole theConsole;
+	TSize consSize(KConsFullScreen, KConsFullScreen);
+	TInt err;
+	err = theConsole.Create();
+	err = theConsole.Control(_L("-Visibility"));
+	err = theConsole.Set(_L("The Epoc RichText Parser (c)"), consSize);
+	err = theConsole.Control(_L("Visibility Newline Max_win_size"));
+ 
+	// Parse PML
+	CParser* myParser;
+	CRichText* richTextDoc;
+	TRAPD(ret, myParser=CParser::NewL());
+	TRAP(ret, richTextDoc = myParser->ParseL(theConsole));
+	TInt dum=ret;
+
+/* 	//enable this bit for a pause before executing test code
+	// wait for keypress
+	theConsole.Write(_L("\n\nPress space to execute test code & parse back to PML\n"));
+	TConsoleKey keystroke;
+	while (keystroke.Code() != EKeySpace)
+		theConsole.Read(keystroke);
+*/
+
+// *********** insert test code here ****************
+
+
+/*	TInt para=richTextDoc->CountParas();
+	TInt length=richTextDoc->DocumentLength();
+	CParaFormat* myformat;
+	TRAP(ret,myformat=CParaFormat::NewL());
+	TCharFormat charFormat; CPicture* picture; TPtrC view;
+	TRAP(ret,richTextDoc->SenseParaFormatL(length,myformat));
+	TRAP(ret,richTextDoc->SenseChars(0,view,charFormat,picture));
+	TRAP(ret,richTextDoc->SenseChars(10,view,charFormat,picture));
+	richTextDoc->Delete(4,6);
+	//TRAP(ret,richTextDoc->InsertL(richTextDoc->DocumentLength(),EParagraphDelimiter));
+*/
+
+	// make rich text reader & read rich text doc & parse back to PML
+	CRichTextReader* myRTReader;
+	CBufSeg* returnedPmlDoc; 
+	TRAP(ret, myRTReader = CRichTextReader::NewL());
+	TRAP(ret, returnedPmlDoc = myRTReader->ConvertRichText(richTextDoc,theConsole));
+
+	// save to disc
+	CFileApp* myFileApp;
+	TRAP(ret, myFileApp = CFileApp::NewL());
+	TInt errorLevel = myFileApp->SaveFile(returnedPmlDoc,myParser->iFileName);
+	if (errorLevel == 0)
+		theConsole.Write(_L("\n\nFile Saved"));
+	else
+		theConsole.Write(_L("\n\nFile Save unsuccessful!!"));
+
+	// wait for keypress
+	theConsole.Write(_L("\n\nPress space to quit\n"));
+	TConsoleKey keystroke;
+	while (keystroke.Code() != EKeySpace)
+		theConsole.Read(keystroke);
+
+	// finish up
+	Adt::Destroy(myFileApp);
+	Adt::Destroy(myRTReader);
+	Adt::Destroy(myParser);
+	theConsole.Destroy();
+	Adt::Destroy(cleanup);
+	__UHEAP_MARKEND;
+	return 0;
+	}
+