Se cambia de lugar la purgación de teorías porque podía pasar que se purge una teoria...

[z.facultad/75.68/celdas.git] / trunk / src / plugin.cpp

diff --git a/trunk/src/plugin.cpp b/trunk/src/plugin.cpp
index 20096f3a1fdc0522e1ed8f6519aecd290c370255..52e1404a4c17231fa4fbba8dc04300b03d366849 100644 (file)
--- a/trunk/src/plugin.cpp
+++ b/trunk/src/plugin.cpp
@@ -50,13 +50,6 @@ int SAbrTeoriaGetAccion(brEval args[], brEval* result, void* data)
        return EC_OK;\r
 }\r
 \r
        return EC_OK;\r
 }\r
 \r

-// void TeoriaDelete(pointer{Teoria})\r
-int SAbrTeoriaDelete(brEval args[], brEval* result, void* data)\r
-{\r
-       delete (CTeoria*) BRPOINTER(args);\r
-       return EC_OK;\r
-}\r
-\r

 \r
 /////////////////////////// CSistemaAutonomo /////////////////////////\r
 \r
 \r
 /////////////////////////// CSistemaAutonomo /////////////////////////\r
 \r


@@ -149,8 +142,6 @@ DLLEXPORT void SAbrFunctions(void *data)
                       AT_STRING, AT_POINTER, 0);\r
        brNewBreveCall(data, "TeoriaGetAccion", SAbrTeoriaGetAccion,\r
                       AT_STRING, AT_POINTER, 0);\r
                       AT_STRING, AT_POINTER, 0);\r
        brNewBreveCall(data, "TeoriaGetAccion", SAbrTeoriaGetAccion,\r
                       AT_STRING, AT_POINTER, 0);\r

-       brNewBreveCall(data, "TeoriaDelete", SAbrTeoriaDelete,\r
-                      AT_NULL, AT_POINTER, 0);\r

        brNewBreveCall(data, "SistemaAutonomoNew", SAbrSistemaAutonomoNew,\r
                       AT_POINTER, 0);\r
        brNewBreveCall(data, "SistemaAutonomoAddTeoria", SAbrSistemaAutonomoAddTeoria,\r
        brNewBreveCall(data, "SistemaAutonomoNew", SAbrSistemaAutonomoNew,\r
                       AT_POINTER, 0);\r
        brNewBreveCall(data, "SistemaAutonomoAddTeoria", SAbrSistemaAutonomoAddTeoria,\r