test: group examples into per-category folders

Move examples/*.sx and their expected/ snapshots into per-category subfolders (examples/<category>/...). Folder = leading filename token, with ffi-objc/ffi-jni kept whole; filenames are unchanged. The corpus runner and LSP sweep now discover each category's expected/ dir, while issues/ stays flat. Example 1058's repo-root-relative companion import is made file-relative. Path strings embedded in 164 snapshots were regenerated (path-only changes). Test-layout docs in CLAUDE.md updated.
2026-06-21 14:41:34 +03:00
parent 6d1409bc1f
commit 66bdc70bf1
3357 changed files with 456 additions and 363 deletions
--- a/examples/platform/1602-platform-http-server.sx
+++ b/examples/platform/1602-platform-http-server.sx
@@ -0,0 +1,81 @@
+// HTTP server example (macOS only)
+
+#import "modules/std.sx";
+#import "modules/std/socket.sx";
+
+// --- Logger ---
+
+Logger :: struct {
+    prefix: string;
+    count: i64;
+}
+
+log :: (logger: *Logger, msg: string) {
+    logger.count += 1;
+    print("[{}] {}\n", logger.prefix, msg);
+}
+
+
+
+main :: () -> i32 {
+    PORT :: 8080;
+
+    fd := socket(AF_INET, SOCK_STREAM, 0);
+    if fd < 0 {
+        print("error: socket()\n");
+        return 1;
+    }
+
+    opt : i32 = 1;
+    setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, @opt, 4);
+
+    addr := SockAddr.{ sin_len = 16, sin_family = 2, sin_port = htons(PORT) };
+
+    if bind(fd, @addr, 16) < 0 {
+        print("error: bind()\n");
+        return 1;
+    }
+
+    if listen(fd, 10) < 0 {
+        print("error: listen()\n");
+        return 1;
+    }
+
+    print("listening on http://localhost:{}\n", PORT);
+
+    arena := Arena.init(context.allocator, 65536);
+    logger := Logger.{ prefix = "http", count = 0 };
+
+    while true {
+        client := accept(fd, null, null);
+        if client < 0 { continue; }
+
+        push Context.{ allocator = xx arena, data = xx @logger } {
+            handle(client);
+        }
+
+        arena.reset();
+        close(client);
+    }
+
+    arena.deinit();
+    close(fd);
+    0
+}
+
+handle :: (client: i32) {
+    // Read request
+    buf : [4096]u8 = ---;
+    read(client, buf, buf.len);
+
+    body :: "<html><body><h1>Hello from sx!</h1></body></html>";
+    response :: format("HTTP/1.1 200 OK\r
+Content-Type: text/html\r
+Connection: close\r
+Content-Length: {}\r
+\r\n{}", body.len, body);
+
+    write(client, response, response.len);
+    logger : *Logger = xx context.data;
+    log(logger, format("served request #{}", logger.count + 1));
+}