Added macro COBNEXT and COBPREV that jumps to the next/previous COBOL…

… paragraph.
michaelknigge · Oct 20, 2022 · 68bdc10 · 68bdc10
1 parent 50ab160
commit 68bdc10
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 0 deletions.
diff --git a/macros/cobnext.c b/macros/cobnext.c
@@ -0,0 +1,6 @@
+void cobnext(void)
+{
+   spfservice("cmd", "FIND QUIET p'@' 8 NEXT");
+   spfservice("cmd", "RESET FIND");
+   spfservice("cmd", "RECOLOR");
+}
diff --git a/macros/cobprev.c b/macros/cobprev.c
@@ -0,0 +1,6 @@
+void cobprev(void)
+{
+   spfservice("cmd", "FIND QUIET p'@' 8 PREV");
+   spfservice("cmd", "RESET FIND");
+   spfservice("cmd", "RECOLOR");
+}