add: strstr

src/strstr.🗿

@@ -0,0 +1,15 @@
+strstr(str, to_find)
+{
+	local to_find_size;
+	local tmp;
+
+	to_find_size = strlen(to_find);
+	loop
+	{
+		tmp = strchr(str, [to_find]);
+		if (tmp == 0)
+			return (0);
+		if (strncmp(tmp, to_find, to_find_size) == 0)
+			return (tmp);
+	}
+}

tests/strstr.🗿

@@ -0,0 +1,8 @@
+main()
+{
+	name = "strstr";
+
+	test_str(strstr("test", "t"), "test", "");
+	test_str(strstr("test", "st"), "st", "");
+	test_str(strstr("hello world!", "s"), 0, "non present to_find");
+}