aboutsummaryrefslogtreecommitdiff
path: root/src/interp/alql.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/alql.boot')
-rw-r--r--src/interp/alql.boot4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/interp/alql.boot b/src/interp/alql.boot
index 5b7431ad..56358a87 100644
--- a/src/interp/alql.boot
+++ b/src/interp/alql.boot
@@ -1,5 +1,7 @@
-- Copyright (c) 1991-2002, The Numerical ALgorithms Group Ltd.
-- All rights reserved.
+-- Copyright (C) 2007-2010, Gabriel Dos Reis.
+-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
-- modification, are permitted provided that the following conditions are
@@ -35,7 +37,7 @@ namespace BOOT
getBrowseDatabase(kind) ==
$includeUnexposed? : local := true
- not member(kind,'("o" "k" "c" "d" "p")) => nil
+ not (kind in '("o" "k" "c" "d" "p")) => nil
grepConstruct('"*",INTERN kind)
stringMatches?(pattern,subject) ==