From 84adefa331c4159d432d22840663c38f155cd4c1 Mon Sep 17 00:00:00 2001 From: Erlang/OTP Date: Fri, 20 Nov 2009 14:54:40 +0000 Subject: The R13B03 release. --- bootstrap/lib/stdlib/include/erl_bits.hrl | 48 +++++++++++++++++++++++++++ bootstrap/lib/stdlib/include/erl_compile.hrl | 43 ++++++++++++++++++++++++ bootstrap/lib/stdlib/include/ms_transform.hrl | 19 +++++++++++ bootstrap/lib/stdlib/include/qlc.hrl | 19 +++++++++++ bootstrap/lib/stdlib/include/zip.hrl | 31 +++++++++++++++++ 5 files changed, 160 insertions(+) create mode 100644 bootstrap/lib/stdlib/include/erl_bits.hrl create mode 100644 bootstrap/lib/stdlib/include/erl_compile.hrl create mode 100644 bootstrap/lib/stdlib/include/ms_transform.hrl create mode 100644 bootstrap/lib/stdlib/include/qlc.hrl create mode 100644 bootstrap/lib/stdlib/include/zip.hrl (limited to 'bootstrap/lib/stdlib/include') diff --git a/bootstrap/lib/stdlib/include/erl_bits.hrl b/bootstrap/lib/stdlib/include/erl_bits.hrl new file mode 100644 index 0000000000..3ca71af3a0 --- /dev/null +++ b/bootstrap/lib/stdlib/include/erl_bits.hrl @@ -0,0 +1,48 @@ +%% +%% %CopyrightBegin% +%% +%% Copyright Ericsson AB 2008-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% +%% +%% This is an -*- erlang -*- file. +%% Generic compiler options, passed from the erl_compile module. + +-type bt_endian():: 'big' | 'little' | 'native'. +-type bt_sign() :: 'signed' | 'unsigned'. +-type bt_type() :: 'integer' | 'float' | 'binary' | 'utf8' | 'utf16' | 'utf32'. +-type bt_unit() :: 1..256. + +-record(bittype, { + type :: bt_type(), + unit :: bt_unit(), %% element unit + sign :: bt_sign(), + endian :: bt_endian() + }). + +-record(bitdefault, { + integer, %% default type for integer + float, %% default type for float + binary %% default type for binary + }). + +%%% (From config.hrl in the bitsyntax branch.) +-define(SYS_ENDIAN, big). +-define(SIZEOF_CHAR, 1). +-define(SIZEOF_DOUBLE, 8). +-define(SIZEOF_FLOAT, 4). +-define(SIZEOF_INT, 4). +-define(SIZEOF_LONG, 4). +-define(SIZEOF_LONG_LONG, 8). +-define(SIZEOF_SHORT, 2). diff --git a/bootstrap/lib/stdlib/include/erl_compile.hrl b/bootstrap/lib/stdlib/include/erl_compile.hrl new file mode 100644 index 0000000000..48aadbcc5e --- /dev/null +++ b/bootstrap/lib/stdlib/include/erl_compile.hrl @@ -0,0 +1,43 @@ +%% +%% %CopyrightBegin% +%% +%% Copyright Ericsson AB 2008-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% +%% + +%% Generic compiler options, passed from the erl_compile module. + +-record(options, + {includes=[] :: [file:filename()], % Include paths (list of + % absolute directory names). + outdir="." :: file:filename(), % Directory for result + % (absolute path). + output_type=undefined :: atom(), % Type of output file. + defines=[] :: [atom() | {atom(),_}], % Preprocessor defines. Each + % element is an atom + % (the name to define), or + % a {Name, Value} tuple. + warning=1 :: non_neg_integer(), % Warning level (0 - no + % warnings, 1 - standard level, + % 2, 3, ... - more warnings). + verbose=false :: boolean(), % Verbose (true/false). + optimize=999, % Optimize options. + specific=[] :: [_], % Compiler specific options. + outfile="" :: file:filename(), % Name of output file (internal + % use in erl_compile.erl). + cwd :: file:filename() % Current working directory + % for erlc. + }). + diff --git a/bootstrap/lib/stdlib/include/ms_transform.hrl b/bootstrap/lib/stdlib/include/ms_transform.hrl new file mode 100644 index 0000000000..fed832fa66 --- /dev/null +++ b/bootstrap/lib/stdlib/include/ms_transform.hrl @@ -0,0 +1,19 @@ +%% +%% %CopyrightBegin% +%% +%% Copyright Ericsson AB 2008-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% +%% +-compile({parse_transform,ms_transform}). diff --git a/bootstrap/lib/stdlib/include/qlc.hrl b/bootstrap/lib/stdlib/include/qlc.hrl new file mode 100644 index 0000000000..edb1e7ef57 --- /dev/null +++ b/bootstrap/lib/stdlib/include/qlc.hrl @@ -0,0 +1,19 @@ +%% +%% %CopyrightBegin% +%% +%% Copyright Ericsson AB 2008-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% +%% +-compile({parse_transform,qlc}). diff --git a/bootstrap/lib/stdlib/include/zip.hrl b/bootstrap/lib/stdlib/include/zip.hrl new file mode 100644 index 0000000000..7336b760cd --- /dev/null +++ b/bootstrap/lib/stdlib/include/zip.hrl @@ -0,0 +1,31 @@ +%% +%% %CopyrightBegin% +%% +%% Copyright Ericsson AB 2008-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% +%% + +-record(zip_file, { + name :: string(), % file name + info :: #file_info{}, + comment :: string(), % zip file comment + offset :: non_neg_integer(), % offset of file's local header in archive + comp_size :: non_neg_integer() % compressed size + }). + +-record(zip_comment, { + comment :: string() % zip archive comment + }). + -- cgit v1.2.3