PEGASUS: Import MMFunctionPtr class

3 files changed, 100 insertions, 0 deletions

diff --git a/engines/pegasus/MMShell/Base_Classes/MMFunctionPtr.cpp b/engines/pegasus/MMShell/Base_Classes/MMFunctionPtr.cpp
new file mode 100755
index 0000000000..c0e616c7ad
--- /dev/null
+++ b/engines/pegasus/MMShell/Base_Classes/MMFunctionPtr.cpp
@@ -0,0 +1,48 @@
+/* ScummVM - Graphic Adventure Engine
+ *
+ * ScummVM is the legal property of its developers, whose names
+ * are too numerous to list here. Please refer to the COPYRIGHT
+ * file distributed with this source distribution.
+ *
+ * Additional copyright for this file:
+ * Copyright (C) 1995-1997 Presto Studios
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ */
+
+#include "pegasus/MMShell/Base_Classes/MMFunctionPtr.h"
+
+namespace Pegasus {
+
+MMFunctionPtr::MMFunctionPtr() {
+	fTheFunction = 0;
+	fFunctionArg = 0;
+}
+
+MMFunctionPtr::~MMFunctionPtr() {
+}
+
+void MMFunctionPtr::SetFunctionPtr(tFunctionPtr theFunction, void *functionArg) {
+	fTheFunction = theFunction;
+	fFunctionArg = functionArg;
+}
+
+void MMFunctionPtr::CallFunction() {
+	if (fTheFunction != 0)
+		(*fTheFunction)(this, fFunctionArg);
+}
+
+} // End of namespace Pegasus
diff --git a/engines/pegasus/MMShell/Base_Classes/MMFunctionPtr.h b/engines/pegasus/MMShell/Base_Classes/MMFunctionPtr.h
new file mode 100755
index 0000000000..e9c212602f
--- /dev/null
+++ b/engines/pegasus/MMShell/Base_Classes/MMFunctionPtr.h
@@ -0,0 +1,51 @@
+/* ScummVM - Graphic Adventure Engine
+ *
+ * ScummVM is the legal property of its developers, whose names
+ * are too numerous to list here. Please refer to the COPYRIGHT
+ * file distributed with this source distribution.
+ *
+ * Additional copyright for this file:
+ * Copyright (C) 1995-1997 Presto Studios
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ */
+
+#ifndef PEGASUS_MMSHELL_BASECLASSES_MMFUNCTIONPTR_H
+#define PEGASUS_MMSHELL_BASECLASSES_MMFUNCTIONPTR_H
+
+namespace Pegasus {
+
+class MMFunctionPtr;
+
+typedef void (*tFunctionPtr)(MMFunctionPtr *theFunction, void *functionArg);
+
+class MMFunctionPtr {
+public:
+	MMFunctionPtr();
+	virtual ~MMFunctionPtr();
+	
+	void SetFunctionPtr(tFunctionPtr theFunction, void *functionArg);
+
+protected:
+	void CallFunction();
+	
+	tFunctionPtr fTheFunction;
+	void *fFunctionArg;
+};
+
+} // End of namespace Pegasus
+
+#endif
diff --git a/engines/pegasus/module.mk b/engines/pegasus/module.mk
index 050285f597..2c07c385ad 100644
--- a/engines/pegasus/module.mk
+++ b/engines/pegasus/module.mk
@@ -10,6 +10,7 @@ MODULE_OBJS = \
 	pegasus.o \
 	video.o \
 	Game_Shell/CItem.o \
+	MMShell/Base_Classes/MMFunctionPtr.o \
 	MMShell/Sounds/MMSound.o \
 	MMShell/Utilities/MMResourceFile.o \
 	MMShell/Utilities/MMUtilities.o