diff --git a/histmem.c b/histmem.c
index b9717e25..f6b91730 100644
--- a/histmem.c
+++ b/histmem.c
@@ -1301,6 +1301,14 @@ int HistAction(SConnection * pCon, SicsInterp * pSics, void *pData,
     SCSendOK(pCon);
     return 1;
   }
+  else if (strcmp(argv[1], "astop") == 0) {
+    if (!SCMatchRights(pCon, usUser)) {
+      return 0;
+    }
+    self->pDriv->Halt(self->pDriv);
+    SCSendOK(pCon);
+    return 1;
+  }
   /* pause */
   else if (strcmp(argv[1], "pause") == 0) {
     if (!SCMatchRights(pCon, usUser)) {