summaryrefslogtreecommitdiff
path: root/dev-lang/polyml/files/polyml-5.5.2-r1952-check_for_negative_sized_array.patch
diff options
context:
space:
mode:
Diffstat (limited to 'dev-lang/polyml/files/polyml-5.5.2-r1952-check_for_negative_sized_array.patch')
-rw-r--r--dev-lang/polyml/files/polyml-5.5.2-r1952-check_for_negative_sized_array.patch13
1 files changed, 0 insertions, 13 deletions
diff --git a/dev-lang/polyml/files/polyml-5.5.2-r1952-check_for_negative_sized_array.patch b/dev-lang/polyml/files/polyml-5.5.2-r1952-check_for_negative_sized_array.patch
deleted file mode 100644
index 1451d2df8d84..000000000000
--- a/dev-lang/polyml/files/polyml-5.5.2-r1952-check_for_negative_sized_array.patch
+++ /dev/null
@@ -1,13 +0,0 @@
-Index: polyml/basis/Array.sml
-===================================================================
---- polyml/basis/Array.sml (revision 1951)
-+++ polyml/basis/Array.sml (revision 1952)
-@@ -129,7 +129,7 @@
-
- fun array(len, a) =
- let
-- val () = if len >= maxLen then raise General.Size else ()
-+ val () = if len < 0 orelse len >= maxLen then raise General.Size else ()
- val vec = System_alloc(len+1, 0wx40, RunCall.unsafeCast a)
- in
- System_setw(vec, 0, RunCall.unsafeCast len);