From ec6c2ccc3ef4d23493ad04fd528adcbcaedae3b4 Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Wed, 5 May 2010 22:32:45 -0700 Subject: [PATCH] silence more msvc warnings --- vm/gc.cpp | 2 +- vm/io.cpp | 8 ++++---- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/vm/gc.cpp b/vm/gc.cpp index ed36aff563..599ed3cd31 100755 --- a/vm/gc.cpp +++ b/vm/gc.cpp @@ -180,7 +180,7 @@ void factor_vm::gc(gc_op op, cell requested_bytes, bool trace_contexts_p) break; } - catch(const must_start_gc_again e) + catch(const must_start_gc_again &) { /* We come back here if a generation is full */ start_gc_again(); diff --git a/vm/io.cpp b/vm/io.cpp index 94e6e64d1d..ba1e429802 100755 --- a/vm/io.cpp +++ b/vm/io.cpp @@ -208,7 +208,7 @@ void factor_vm::primitive_fread() data_root buf(allot_uninitialized_array(size),this); - int c = safe_fread(buf.untagged() + 1,1,size,file); + size_t c = safe_fread(buf.untagged() + 1,1,size,file); if(c == 0) ctx->push(false_object); else @@ -228,7 +228,7 @@ void factor_vm::primitive_fputc() { FILE *file = pop_file_handle(); fixnum ch = to_fixnum(ctx->pop()); - safe_fputc(ch, file); + safe_fputc((int)ch, file); } void factor_vm::primitive_fwrite() @@ -254,8 +254,8 @@ void factor_vm::primitive_ftell() void factor_vm::primitive_fseek() { FILE *file = pop_file_handle(); - int whence = to_fixnum(ctx->pop()); - off_t offset = to_signed_8(ctx->pop()); + int whence = (int)to_fixnum(ctx->pop()); + off_t offset = (off_t)to_signed_8(ctx->pop()); safe_fseek(file,offset,whence); }