--- rpl/src/interface_cas.cpp	2011/06/23 13:41:16	1.2
+++ rpl/src/interface_cas.cpp	2011/06/24 09:10:37	1.3
@@ -22,19 +22,16 @@
 
 #include "giac.h"
 
+#undef PACKAGE
+#undef PACKAGE_NAME
+#undef PACKAGE_STRING
+#undef PACKAGE_TARNAME
+#undef PACKAGE_VERSION
+#undef VERSION
+
 extern "C"
 {
-
-#	undef PACKAGE
-#	undef PACKAGE_NAME
-#	undef PACKAGE_STRING
-#	undef PACKAGE_TARNAME
-#	undef PACKAGE_VERSION
-#	undef VERSION
-
-#	undef _GNU_SOURCE
-#	undef _POSIX_C_SOURCE
-
+#	define __RPLCAS
 #	include "rpl-conv.h"
 }
 
@@ -56,14 +53,24 @@ using namespace giac;
 ================================================================================
 */
 
-unsigned char *
+void
 interface_cas(struct_processus *s_etat_processus,
-		unsigned char *commande, const char *argument)
+		enum t_rplcas_commandes commande)
 {
-	gen e(string(argument), giac::context0);
-	//cout << factor(e) << endl;
+	unsigned char			*argument_1;
+
+	switch(commande)
+	{
+		case RPLCAS_LIMITE:
+		{
+			break;
+		}
+
+		gen e(string(reinterpret_cast<const char *>(argument_1)),
+				giac::context0);
+	}
 
-	return(NULL);
+	return;
 }
 
 // vim: ts=4