mikros/rust
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Calm some LLVM indigestion of last change.

Browse Source
This commit is contained in:
Graydon Hoare 2010-07-27 17:23:41 -07:00
parent 4d31cf1dc5
commit 6662aeb779
2 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Makefile
View File

@ -451,6 +451,7 @@ TEST_XFAILS_LLVM := $(addprefix test/run-pass/, \
rec.rs \
simple-obj.rs \
spawn-fn.rs \
spawn-module-qualified.rs \
spawn.rs \
stateful-obj.rs \
str-append.rs \

12
src/boot/llvm/lltrans.ml
View File

@ -764,16 +764,16 @@ let trans_crate
match lval with
Ast.LVAL_base { id = base_id } ->
set_debug_loc base_id;
let referent = lval_to_referent sem_cx base_id in
let defn_id = lval_base_defn_id sem_cx lval in
begin
match resolve_lval_id sem_cx base_id with
match get_defn sem_cx defn_id with
Semant.DEFN_slot slot ->
(Hashtbl.find slot_to_llvalue referent, slot_ty slot)
(Hashtbl.find slot_to_llvalue defn_id, slot_ty slot)
| Semant.DEFN_item _ ->
(Hashtbl.find llitems referent, lval_ty sem_cx lval)
(Hashtbl.find llitems defn_id, lval_ty sem_cx lval)
| _ ->
Common.unimpl (Some referent)
"LLVM base-referent translation of: %a"
Common.unimpl (Some defn_id)
"LLVM base-defn translation of: %a"
Ast.sprintf_lval lval
end
| Ast.LVAL_ext (base, component) ->