nordic-dev.net/rust
nordic-dev.net/rust
2
0
Fork 0
mirror of https://github.com/rust-lang/rust.git synced 2024-11-22 14:55:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Build fix from jmuizelaar (on ocamlc versions that notice this bug; drat, not all do)

Browse Source
This commit is contained in:
Graydon Hoare 2010-07-08 08:25:12 -07:00
parent 004240e0bc
commit 48488b0dcf
4 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
AUTHORS.txt
View File

@ -7,6 +7,7 @@ Other authors:
Andreas Gal <gal@mozilla.com>
Brendan Eich <brendan@mozilla.org>
Dave Herman <dherman@mozilla.com>
Jeff Mulzelaar <jmuizelaar@mozilla.com>
Matt Brubeck <mbrubeck@limpet.net>
Michael Bebenita <mbebenita@mozilla.com>
Patrick Walton <pwalton@mozilla.com>

2
src/boot/me/alias.ml
View File

@ -41,7 +41,7 @@ let alias_analysis_visitor
begin
fun i slot ->
match slot.Ast.slot_mode with
Ast.MODE_alias _ ->
Ast.MODE_alias ->
alias_atom args.(i)
| _ -> ()
end

4
src/boot/me/semant.ml
View File

@ -1883,8 +1883,8 @@ and slot_referent_type (abi:Abi.abi) (sl:Ast.slot) : Il.referent_ty =
let rty = referent_type abi (slot_ty sl) in
match sl.Ast.slot_mode with
| Ast.MODE_local _ -> rty
| Ast.MODE_alias _ -> sp rty
| Ast.MODE_local -> rty
| Ast.MODE_alias -> sp rty
;;
let task_rty (abi:Abi.abi) : Il.referent_ty =

2
src/boot/me/trans.ml
View File

@ -2859,7 +2859,7 @@ let trans_visitor
Ast.MODE_local ->
cell
| Ast.MODE_alias _ ->
| Ast.MODE_alias ->
if initializing
then cell
else deref cell