Index: trunk/Ohana/src/opihi/cmd.basic/init.c
===================================================================
--- trunk/Ohana/src/opihi/cmd.basic/init.c	(revision 7892)
+++ trunk/Ohana/src/opihi/cmd.basic/init.c	(revision 8189)
@@ -31,4 +31,5 @@
 int strlen_func     PROTO((int, char **));
 int substr_func     PROTO((int, char **));
+int strpop          PROTO((int, char **));
 int wait_func  	    PROTO((int, char **));
 int which      	    PROTO((int, char **));
@@ -68,4 +69,5 @@
   {"strlen",        strlen_func,        "string length"},
   {"substr",        substr_func,        "substring"},
+  {"strpop",        strpop,             "pop a string"},
   {"wait",    	    wait_func,          "wait until return is typed"},
   {"which",   	    which,              "show command *"}
