From 84adefa331c4159d432d22840663c38f155cd4c1 Mon Sep 17 00:00:00 2001
From: Erlang/OTP <otp@erlang.org>
Date: Fri, 20 Nov 2009 14:54:40 +0000
Subject: The R13B03 release.

---
 erts/emulator/test/big_SUITE_data/literal_test.erl | 38 ++++++++++++++++++++++
 1 file changed, 38 insertions(+)
 create mode 100644 erts/emulator/test/big_SUITE_data/literal_test.erl

(limited to 'erts/emulator/test/big_SUITE_data/literal_test.erl')

diff --git a/erts/emulator/test/big_SUITE_data/literal_test.erl b/erts/emulator/test/big_SUITE_data/literal_test.erl
new file mode 100644
index 0000000000..dc0adeb1ca
--- /dev/null
+++ b/erts/emulator/test/big_SUITE_data/literal_test.erl
@@ -0,0 +1,38 @@
+%%
+%% %CopyrightBegin%
+%% 
+%% Copyright Ericsson AB 1998-2009. All Rights Reserved.
+%% 
+%% The contents of this file are subject to the Erlang Public License,
+%% Version 1.1, (the "License"); you may not use this file except in
+%% compliance with the License. You should have received a copy of the
+%% Erlang Public License along with this software. If not, it can be
+%% retrieved online at http://www.erlang.org/.
+%% 
+%% Software distributed under the License is distributed on an "AS IS"
+%% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
+%% the License for the specific language governing rights and limitations
+%% under the License.
+%% 
+%% %CopyrightEnd%
+%%
+
+-module(literal_test).
+
+-export([t/0]).
+
+t() ->
+     2639222 = do_band(-30710410, 11032439),
+    -104896167137483835127591520601167100453480347078199925156632915223228188306305878154109985624943277357501787279310034030156370067160844817777591157023073455111626047495778039507502639061242015835277440456218702874565483838389693116456108032 = do_bsl(-283388912239613, 746),
+    899396154689163167548626101 = do_plus(899396154689163167641847368, -93221267),
+    ok.
+
+do_plus(A, B) ->
+    A + B.
+
+do_band(A, B) ->
+    A band B.
+
+do_bsl(X, S) ->
+    X bsl S.
+
-- 
cgit v1.2.3