fix dr_flac trying to include stdio and wchar now for some reason

Author: braindigitalis

modules/flac/flac.c

@@ -4,6 +4,8 @@
 #define DRFLAC_REALLOC(p, sz) krealloc(p,sz)
 #define DRFLAC_FREE(p) kfree(p)
 #define DRFLAC_ASSERT(x) {}
+#define DR_FLAC_NO_WCHAR
+#define DR_FLAC_NO_STDIO
 #define DR_FLAC_IMPLEMENTATION
 #include "dr_flac.h"
 

os/programs/tree.rrbasic

@@ -0,0 +1,46 @@
+start$ = ARGS$
+IF start$ = "" THEN start$ = CSD$
+
+dirs = 0
+files = 0
+
+PRINT start$
+PROCwalk(start$, "")
+
+PRINT
+PRINT dirs; " directories, "; files; " files."
+END
+
+DEF PROCwalk(dir$, prefix$)
+	LOCAL n = GETNAMECOUNT(dir$)
+	LOCAL i = 0
+	FOR i = 0 TO n - 1
+		LOCAL name$ = GETNAME$(dir$, i)
+
+		IF dir$ = "" THEN LOCAL base$ = ""
+		IF dir$ <> "" THEN LOCAL base$ = dir$ + "/"
+		LOCAL full$ = base$ + name$
+
+		LOCAL is_last = FALSE
+		IF i = n - 1 THEN is_last = TRUE
+
+		IF is_last = TRUE THEN LOCAL branch$ = prefix$ + "\-- "
+		IF is_last = FALSE THEN LOCAL branch$ = prefix$ + "+-- "
+
+		LOCAL ftype$ = FILETYPE$(full$)
+
+		PRINT branch$; name$
+
+		IF ftype$ = "directory" THEN dirs = dirs + 1
+		IF ftype$ = "file" THEN files = files + 1
+
+		IF ftype$ = "directory" THEN PROCdescend(full$, prefix$, is_last)
+	NEXT
+ENDPROC
+
+DEF PROCdescend(full$, prefix$, is_last)
+	LOCAL next_prefix$ = prefix$
+	IF is_last = TRUE THEN next_prefix$ = next_prefix$ + "    "
+	IF is_last = FALSE THEN next_prefix$ = next_prefix$ + "|   "
+	PROCwalk(full$, next_prefix$)
+ENDPROC

src/net/tls.c

@@ -385,8 +385,6 @@ int tls_handshake_step_nb(mbedtls_ssl_context *ssl) {
 /* reads/writes return negative error */
 int tls_read_nb(mbedtls_ssl_context *ssl, void *buf, size_t len, int *want) {
 	int n = mbedtls_ssl_read(ssl, buf, len);
-	dprintf("mbedtls_ssl_read\n");
-	if (n > 0) dump_hex(buf, n);
 	if (n >= 0) return n;
 	*want = (n == MBEDTLS_ERR_SSL_WANT_READ) ? 1 : (n == MBEDTLS_ERR_SSL_WANT_WRITE) ? 2 : -1;
 	char e[128];
@@ -395,13 +393,6 @@ int tls_read_nb(mbedtls_ssl_context *ssl, void *buf, size_t len, int *want) {
 	return n;
 }
 
-/*int tls_write_nb(mbedtls_ssl_context *ssl, const void *buf, size_t len, int *want) {
-	int n = mbedtls_ssl_write(ssl, buf, len);
-	if (n >= 0) return n;
-	*want = (n == MBEDTLS_ERR_SSL_WANT_WRITE) ? 2 : (n == MBEDTLS_ERR_SSL_WANT_READ) ? 1 : -1;
-	return -1;
-}*/
-
 static int tcp_send_nb(void *ctx, const unsigned char *buf, size_t len) {
 	int fd = (int) (uintptr_t) ctx;
 	int n = send(fd, buf, (uint32_t) len);