diff options
Diffstat (limited to 'stdlib/queue.ml')
-rw-r--r-- | stdlib/queue.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/stdlib/queue.ml b/stdlib/queue.ml index 477afcb08..5a08721f5 100644 --- a/stdlib/queue.ml +++ b/stdlib/queue.ml @@ -123,6 +123,9 @@ let copy q = tail = tail' } +let is_empty q = + q.length = 0 + let length q = q.length |