diff options
| author | Graydon Hoare <[email protected]> | 2010-06-28 09:39:43 -0700 |
|---|---|---|
| committer | Graydon Hoare <[email protected]> | 2010-06-28 09:39:43 -0700 |
| commit | d608c091680989e331b849fac8936a6e493bed43 (patch) | |
| tree | 194928a43764fecce4f753533775994b13b98534 /src/boot/fe | |
| parent | Once more with feeling. Closes #13. (diff) | |
| download | rust-d608c091680989e331b849fac8936a6e493bed43.tar.xz rust-d608c091680989e331b849fac8936a6e493bed43.zip | |
Some fixme-to-issue housekeeping.
Diffstat (limited to 'src/boot/fe')
| -rw-r--r-- | src/boot/fe/cexp.ml | 2 | ||||
| -rw-r--r-- | src/boot/fe/item.ml | 1 | ||||
| -rw-r--r-- | src/boot/fe/parser.ml | 2 |
3 files changed, 2 insertions, 3 deletions
diff --git a/src/boot/fe/cexp.ml b/src/boot/fe/cexp.ml index 6dffdb96..bf5e32b8 100644 --- a/src/boot/fe/cexp.ml +++ b/src/boot/fe/cexp.ml @@ -325,7 +325,7 @@ let unexpected_val (expected:string) (v:pval) = | PVAL_num i -> "num " ^ (Int64.to_string i) | PVAL_bool b -> if b then "bool true" else "bool false" in - (* FIXME: proper error reporting, please. *) + (* FIXME (issue #70): proper error reporting, please. *) bug () "expected %s, got %s" expected got ;; diff --git a/src/boot/fe/item.ml b/src/boot/fe/item.ml index a2763d96..3efd4e2a 100644 --- a/src/boot/fe/item.ml +++ b/src/boot/fe/item.ml @@ -960,7 +960,6 @@ and parse_mod_item_from_signature (ps:pstate) let bpos = lexpos ps in (ident, span ps apos bpos (decl params (Ast.MOD_ITEM_type t))) - (* FIXME: parse obj. *) | _ -> raise (unexpected ps) diff --git a/src/boot/fe/parser.ml b/src/boot/fe/parser.ml index 3dda93ac..5df44303 100644 --- a/src/boot/fe/parser.ml +++ b/src/boot/fe/parser.ml @@ -209,7 +209,7 @@ let build_tmp (* Simple helpers *) -(* FIXME: please rename these, they make eyes bleed. *) +(* FIXME (issue #71): please rename these, they make eyes bleed. *) let arr (ls:'a list) : 'a array = Array.of_list ls ;; let arl (ls:'a list) : 'a array = Array.of_list (List.rev ls) ;; |