Initial import

1 files changed, 61 insertions, 0 deletions

diff --git a/OpenAL32/alError.c b/OpenAL32/alError.c
new file mode 100644
index 00000000..df5c16e4
--- /dev/null
+++ b/OpenAL32/alError.c
@@ -0,0 +1,61 @@
+/**
+ * OpenAL cross platform audio library
+ * Copyright (C) 1999-2000 by authors.
+ * This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ *  Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the
+ *  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ *  Boston, MA  02111-1307, USA.
+ * Or go to http://www.gnu.org/copyleft/lgpl.html
+ */
+
+#include "alMain.h"
+#include "AL/alc.h"
+#include "alError.h"
+
+ALAPI ALenum ALAPIENTRY alGetError(ALvoid)
+{
+	ALCcontext *Context;
+	ALenum errorCode;
+
+	Context = alcGetCurrentContext();
+	SuspendContext(Context);
+
+	if (Context)
+	{
+		errorCode = Context->LastError;
+		Context->LastError = AL_NO_ERROR;
+	}
+	else
+	{
+		errorCode = AL_INVALID_OPERATION;
+	}
+
+	ProcessContext(Context);
+
+	return errorCode;
+}
+
+ALvoid alSetError(ALenum errorCode)
+{
+	ALCcontext *Context;
+
+	Context=alcGetCurrentContext();
+	SuspendContext(Context);
+
+	if (Context)
+	{
+		Context->LastError=errorCode;
+	}
+	
+	ProcessContext(Context);
+}