Data update

2026-04-30 12:34:36 -04:00 · 2026-04-30 12:34:36 -04:00 · cbaf4c4b64
commit cbaf4c4b64
parent 4bb20c9b71
12390 changed files with 318560 additions and 27248 deletions
--- a/Task/Empty-string/OPL/empty-string.opl
+++ b/Task/Empty-string/OPL/empty-string.opl
@ -0,0 +1,19 @@
+REM String variables are initially empty after declaring them.
+
+PROC main:
+  LOCAL s$(10)
+  checkstr:(s$)
+  s$="not empty."
+  checkstr:(s$)
+  s$=""
+  checkstr:(s$)
+  GET
+ENDP
+
+PROC checkstr:(s$)
+  IF s$=""
+    PRINT "String is empty."
+  ELSE
+    PRINT "String is",s$
+  ENDIF
+ENDP