Index: TECH/Context.cls.xml
===================================================================
diff -u -r801 -r815
--- TECH/Context.cls.xml	(.../Context.cls.xml)	(revision 801)
+++ TECH/Context.cls.xml	(.../Context.cls.xml)	(revision 815)
@@ -186,6 +186,9 @@
 <FormalSpec>APINaam:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
+	If (..APINamen.GetAt(APINaam).Count() <= 1){
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Kan geen Pop uitvoeren. Er moet minstens één '"_APINaam_"'-API overblijven."))
+	}
 	Do ..APINamen.GetAt(APINaam).Pop()
 	Do ..APIObjecten.RemoveAt(APINaam)
 ]]></Implementation>