aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/fname.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/fname.spad.pamphlet')
-rw-r--r--src/algebra/fname.spad.pamphlet4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/fname.spad.pamphlet b/src/algebra/fname.spad.pamphlet
index bfc9dc11..e9c558fb 100644
--- a/src/algebra/fname.spad.pamphlet
+++ b/src/algebra/fname.spad.pamphlet
@@ -99,8 +99,8 @@ FileName(): FileNameCategory == add
extension(f:%): String == fnameType(f)$Lisp
exists? f == existingFile?(f::String)$Lisp
- readable? f == readablep(f::String)$Lisp : Integer = 1
- writable? f == writeablep(f::String)$Lisp : Integer = 1
+ readable? f == readablep(f::String)$Lisp = 1@SingleInteger
+ writable? f == writeablep(f::String)$Lisp > 0@SingleInteger
new(d,pref,e) == fnameNew(d,pref,e)$Lisp