diff --git a/extras/hoon-mode.el/hoon-mode.el b/extras/hoon-mode.el/hoon-mode.el index a8c6f69e0..b4ecd074a 100644 --- a/extras/hoon-mode.el/hoon-mode.el +++ b/extras/hoon-mode.el/hoon-mode.el @@ -71,7 +71,7 @@ (set (make-local-variable 'comment-use-syntax) nil) (set (make-local-variable 'comment-start-skip) "\\(::+\\)\\s *") (set (make-local-variable 'font-lock-defaults) '(hoon-font-lock-keywords)) - (set (make-local-variable 'indent-tabs-mode nil)) ;; tabs zutiefst verboten + (set (make-local-variable 'indent-tabs-mode) nil) ;; tabs zutiefst verboten (set (make-local-variable 'indent-line-function) 'indent-relative) (set (make-local-variable 'imenu-generic-expression) hoon-imenu-generic-expression) diff --git a/gen164/3/dis.c b/gen164/3/dis.c index 836c0049f..b7af6a3a8 100644 --- a/gen164/3/dis.c +++ b/gen164/3/dis.c @@ -30,7 +30,7 @@ u2_chop(5, 0, len_w, 0, sal_r, a); for ( i_w = 0; i_w < len_w; i_w++ ) { - *u2_at_ray(sal_r + i_w) &= u2_atom_word(b, i_w); + *u2_at_ray(sal_r + i_w) &= (i_w >= lnb_w) ? 0 : u2_atom_word(b, i_w); } return u2_rl_malt(wir_r, sal_r); } diff --git a/v/unix.c b/v/unix.c index 4a79cf1f3..9415462f3 100644 --- a/v/unix.c +++ b/v/unix.c @@ -58,7 +58,7 @@ _unix_opendir(c3_c* pax_c) static void _unix_mkdir(c3_c* pax_c) { - if ( 0 != mkdir(pax_c, 0755) ) { + if ( 0 != mkdir(pax_c, 0755) && EEXIST != errno) { uL(fprintf(uH, "%s: %s\n", pax_c, strerror(errno))); c3_assert(0); } @@ -69,7 +69,7 @@ _unix_mkdir(c3_c* pax_c) static void _unix_unlink(c3_c* pax_c) { - if ( 0 != unlink(pax_c) ) { + if ( 0 != unlink(pax_c) && ENOENT != errno) { uL(fprintf(uH, "%s: %s\n", pax_c, strerror(errno))); c3_assert(0); }