From 907162bbfd3643b920ff5971d501eaa4de462278 Mon Sep 17 00:00:00 2001
From: Koichi Nakamura <koichi@idein.jp>
Date: Sun, 19 Dec 2021 23:07:56 +0900
Subject: [PATCH] Set O_TRUNC by default

---
 bootstrap.fs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/bootstrap.fs b/bootstrap.fs
index 539276a..be4d7f2 100644
--- a/bootstrap.fs
+++ b/bootstrap.fs
@@ -1691,9 +1691,9 @@ do-stack 16 cells + do-sp !
 -1 constant EOF
 
 \ file access methods (fam)
-0x00 constant R/O  \ read-only
-0x41 constant W/O  \ write-only
-0x42 constant R/W  \ read-write
+0x000 constant R/O  \ read-only
+0x241 constant W/O  \ write-only
+0x242 constant R/W  \ read-write
 
 1024 constant BUFSIZE
 128 constant FILENAME-MAX