nebulara 2.0.0

package/std/math.nbs

@@ -0,0 +1,52 @@
+# Nebulara Standard Library - Math
+# Basic math operations (built-in as VM opcodes)
+
+FUNC! abs(x):
+  IF? x < 0:
+    RETURN -x
+  END!
+  RETURN x
+END!
+
+FUNC! min(a, b):
+  IF? a < b:
+    RETURN a
+  END!
+  RETURN b
+END!
+
+FUNC! max(a, b):
+  IF? a > b:
+    RETURN a
+  END!
+  RETURN b
+END!
+
+FUNC! clamp(value, lo, hi):
+  IF? value < lo:
+    RETURN lo
+  END!
+  IF? value > hi:
+    RETURN hi
+  END!
+  RETURN value
+END!
+
+FUNC! sum_array(arr):
+  LET total = 0
+  LET i = 0
+  LET len = LEN(arr)
+  WHILE? i < len:
+    total = total + arr[i]
+    i = i + 1
+  END!
+  RETURN total
+END!
+
+FUNC! average(arr):
+  LET len = LEN(arr)
+  IF? len == 0:
+    RETURN 0
+  END!
+  RETURN sum_array(arr) / len
+END!

package/std/net.nbs

@@ -0,0 +1,22 @@
+# Nebulara Standard Library - Net
+# Network and HTTP utilities (stubs for FFI)
+
+# HTTP functions require FFI to libcurl or platform HTTP library - not yet implemented
+
+# Planned API: GET request, returns response body as string
+FUNC! http_get(url):
+  PRINT "net.http_get: not yet implemented - requires FFI to libcurl or platform HTTP library"
+  RETURN NULL
+END!
+
+# Planned API: POST request with body, returns response body as string
+FUNC! http_post(url, body):
+  PRINT "net.http_post: not yet implemented - requires FFI to libcurl or platform HTTP library"
+  RETURN NULL
+END!
+
+# Planned API: Start HTTP server on given port
+FUNC! serve(port):
+  PRINT "net.serve: not yet implemented - requires FFI to libcurl or platform HTTP library"
+  RETURN NULL
+END!

package/std/primitives.nbs

@@ -0,0 +1,30 @@
+# Nebulara Standard Library - Primitives
+# Type checking and basic operations
+
+FUNC! is_string(v):
+  RETURN TYPEOF(v) == "string"
+END!
+
+FUNC! is_number(v):
+  RETURN TYPEOF(v) == "int"
+END!
+
+FUNC! is_bool(v):
+  RETURN TYPEOF(v) == "bool"
+END!
+
+FUNC! is_array(v):
+  RETURN TYPEOF(v) == "array"
+END!
+
+FUNC! is_null(v):
+  RETURN TYPEOF(v) == "null"
+END!
+
+FUNC! to_int(v):
+  RETURN TO_NUMBER(v)
+END!
+
+FUNC! to_str(v):
+  RETURN TO_STRING(v)
+END!

package/std/string.nbs

@@ -0,0 +1,71 @@
+# Nebulara Standard Library - String
+# String manipulation utilities (using built-in functions)
+
+FUNC! concat(a, b):
+  RETURN a + b
+END!
+
+FUNC! repeat(s, n):
+  LET result = ""
+  LET i = 0
+  WHILE? i < n:
+    result = result + s
+    i = i + 1
+  END!
+  RETURN result
+END!
+
+FUNC! reverse(s):
+  LET len = LEN(s)
+  LET result = ""
+  LET i = len - 1
+  WHILE? i >= 0:
+    result = result + CHAR_AT(s, i)
+    i = i - 1
+  END!
+  RETURN result
+END!
+
+FUNC! contains(s, sub):
+  LET slen = LEN(s)
+  LET sublen = LEN(sub)
+  IF? sublen == 0:
+    RETURN TRUE
+  END!
+  IF? sublen > slen:
+    RETURN FALSE
+  END!
+  LET i = 0
+  WHILE? i <= slen - sublen:
+    LET match = TRUE
+    LET j = 0
+    WHILE? j < sublen:
+      IF? CHAR_AT(s, i + j) != CHAR_AT(sub, j):
+        match = FALSE
+        BREAK
+      END!
+      j = j + 1
+    END!
+    IF? match == TRUE:
+      RETURN TRUE
+    END!
+    i = i + 1
+  END!
+  RETURN FALSE
+END!
+
+FUNC! to_upper(s):
+  RETURN TO_UPPER(s)
+END!
+
+FUNC! to_lower(s):
+  RETURN TO_LOWER(s)
+END!
+
+FUNC! trim(s):
+  RETURN TRIM(s)
+END!
+
+FUNC! substring(s, start, len):
+  RETURN SUBSTR(s, start, len)
+END!

package/std/time.nbs

@@ -0,0 +1,15 @@
+# Nebulara Standard Library - Time
+# Time and date utilities
+
+FUNC! now():
+  RETURN TIME()
+END!
+
+FUNC! elapsed(start_time):
+  RETURN TIME() - start_time
+END!
+
+# sleep is not yet implemented - requires FFI to C library
+FUNC! sleep(ms):
+  PRINT "TIME.sleep: not yet implemented - requires FFI to C library"
+END!

package/test/broken.nbs

@@ -0,0 +1,2 @@
+LET x =
+PRINT(x + )

package/test/hello.nbs

@@ -0,0 +1,6 @@
+# Test Program - basic functionality
+PRINT "Hello from Nebulara!"
+PRINT 42
+LET x = 10
+LET y = 20
+PRINT x + y

package/test/test-arrays.nbs

@@ -0,0 +1,22 @@
+# Test: Arrays
+PRINT "Array tests:"
+LET arr = [10, 20, 30, 40, 50]
+PRINT arr[0]
+PRINT arr[2]
+PRINT arr[4]
+
+PRINT "Array length:"
+PRINT LEN(arr)
+
+PRINT "Array sum:"
+LET total = 0
+FOR! i = 0 TO 4:
+  total = total + arr[i]
+END!
+PRINT total
+
+PRINT "Array with strings:"
+LET words = ["hello", "world", "nebulara"]
+PRINT words[0]
+PRINT words[1]
+PRINT LEN(words)

package/test/test-charat.nbs

@@ -0,0 +1,7 @@
+LET s = "hello"
+LET c = CHAR_AT(s, 0)
+PRINT(c)
+LET c2 = CHAR_AT(s, 1)
+PRINT(c2)
+LET c3 = CHAR_AT(s, 4)
+PRINT(c3)

package/test/test-cont-debug.nbs

@@ -0,0 +1,8 @@
+# Minimal CONTINUE test
+LET i = 0
+FOR! j = 1 TO 5:
+  j = j + 1
+  CONTINUE
+  PRINT j
+END!
+PRINT "done"

package/test/test-cont-min.nbs

@@ -0,0 +1,7 @@
+# Minimal CONTINUE test
+FOR! i = 1 TO 5:
+  IF? i == 3:
+    CONTINUE
+  END!
+  PRINT i
+END!

package/test/test-cont-parens.nbs

@@ -0,0 +1,7 @@
+# Test: modulo comparison with parens
+FOR! m = 1 TO 10:
+  IF? (m % 2) == 0:
+    CONTINUE
+  END!
+  PRINT m
+END!

package/test/test-cont2.nbs

@@ -0,0 +1,7 @@
+# CONTINUE test without modulo
+FOR! m = 1 TO 10:
+  IF? m == 5:
+    CONTINUE
+  END!
+  PRINT m
+END!

package/test/test-cont3.nbs

@@ -0,0 +1,7 @@
+# CONTINUE with modulo
+FOR! m = 1 TO 10:
+  IF? m % 2 == 0:
+    CONTINUE
+  END!
+  PRINT m
+END!

package/test/test-control.nbs

@@ -0,0 +1,18 @@
+# Test: BREAK and CONTINUE
+PRINT "BREAK test:"
+LET n = 1
+WHILE? n <= 10:
+  IF? n == 6:
+    BREAK
+  END!
+  PRINT n
+  n = n + 1
+END!
+
+PRINT "CONTINUE test:"
+FOR! m = 1 TO 10:
+  IF? m % 2 == 0:
+    CONTINUE
+  END!
+  PRINT m
+END!

package/test/test-functions.nbs

@@ -0,0 +1,13 @@
+# Test: Functions with parameters
+FUNC! add(a, b):
+  RETURN a + b
+END!
+
+FUNC! multiply(a, b):
+  RETURN a * b
+END!
+
+PRINT "Function tests:"
+PRINT add(3, 4)
+PRINT multiply(5, 6)
+PRINT add(10, 20)

package/test/test-loops.nbs

@@ -0,0 +1,17 @@
+# Test: Loops - WHILE and FOR
+PRINT "WHILE loop (count to 5):"
+LET i = 1
+WHILE? i <= 5:
+  PRINT i
+  i = i + 1
+END!
+
+PRINT "FOR loop (1 to 5):"
+FOR! j = 1 TO 5:
+  PRINT j
+END!
+
+PRINT "FOR loop with STEP:"
+FOR! k = 0 TO 20 STEP 5:
+  PRINT k
+END!

package/test/test-mod-for.nbs

@@ -0,0 +1,6 @@
+# Test modulo comparison without CONTINUE
+FOR! m = 1 TO 10:
+  IF? m % 2 == 0:
+    PRINT m
+  END!
+END!

package/test/test-mod.nbs

@@ -0,0 +1,5 @@
+# Minimal modulo test
+LET m = 4
+PRINT m % 2
+LET n = 5
+PRINT n % 2

package/test/test-new-features.nbs

@@ -0,0 +1,39 @@
+LET arr = [10, 20, 30]
+arr[1] = 99
+PRINT(arr[1])
+PRINT(arr)
+
+LET a = [1, 2]
+LET b = [3, 4]
+LET c = a + b
+PRINT(LEN(c))
+PRINT(c[2])
+
+PUSH(arr, 40)
+PRINT(LEN(arr))
+PRINT(arr[3])
+
+LET removed = POP(arr)
+PRINT(removed)
+PRINT(LEN(arr))
+
+PRINT(5 & 3)
+PRINT(5 | 3)
+PRINT(1 << 3)
+PRINT(16 >> 2)
+
+PRINT(ABS(-42))
+PRINT(MIN(10, 20))
+PRINT(MAX(10, 20))
+PRINT(SQRT(16))
+PRINT(POW(2, 10))
+
+PRINT(CHAR(65))
+PRINT(ORD("Z"))
+
+LET s = "hello"
+PRINT(TO_UPPER(s))
+PRINT(TO_LOWER(s))
+PRINT(CHAR_AT(s, 1))
+PRINT(SUBSTR(s, 1, 3))
+PRINT(TRIM("  hi  "))

package/test/test-recursion.nbs

@@ -0,0 +1,23 @@
+# Test: Recursion - factorial and fibonacci
+FUNC! factorial(n):
+  IF? n <= 1:
+    RETURN 1
+  END!
+  RETURN n * factorial(n - 1)
+END!
+
+FUNC! fibonacci(n):
+  IF? n <= 0:
+    RETURN 0
+  END!
+  IF? n == 1:
+    RETURN 1
+  END!
+  RETURN fibonacci(n - 1) + fibonacci(n - 2)
+END!
+
+PRINT "Recursion tests:"
+PRINT factorial(5)
+PRINT factorial(10)
+PRINT fibonacci(10)
+PRINT fibonacci(15)

package/test/test-runtime.nbs

@@ -0,0 +1,8 @@
+LET t1 = TIME()
+PRINT("Time1: " + TO_STRING(t1))
+LET t2 = TIME()
+PRINT("Time2: " + TO_STRING(t2))
+LET r1 = RANDOM()
+PRINT("Random1: " + TO_STRING(r1))
+LET r2 = RANDOM()
+PRINT("Random2: " + TO_STRING(r2))

package/test/test-strings.nbs

@@ -0,0 +1,14 @@
+# Test: String operations
+PRINT "String tests:"
+PRINT "Hello" + " " + "World"
+PRINT LEN("Nebulara")
+PRINT TO_STRING(42)
+PRINT TO_NUMBER("123") + 7
+PRINT TYPEOF("hello")
+PRINT TYPEOF(42)
+PRINT TRUE
+PRINT FALSE
+PRINT NULL
+PRINT TYPEOF(TRUE)
+PRINT TYPEOF(FALSE)
+PRINT TYPEOF(NULL)

package/test/test-trycatch.nbs

@@ -0,0 +1,11 @@
+TRY!:
+    PRINT("try start")
+    THROW "something went wrong"
+    PRINT("should not print")
+CATCH! err:
+    PRINT("caught: " + err)
+ENDTRY!
+PRINT("after try")
+
+LET x = 5
+PRINT(x)