kanaka/mal
1
1
Fork 0
mirror of https://github.com/kanaka/mal.git synced 2024-08-17 09:40:21 +03:00
Code Issues Projects Releases Wiki Activity

php: allow keyword argument for keyword core function

Browse Source
This commit is contained in:
Nicolas Boulenguez 2021-08-18 14:11:39 +02:00 committed by Joel Martin
parent c937e2a7a9
commit 8efef038f0
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
impls/php/types.php
View File

@ -65,7 +65,13 @@ function _symbol($name) { return new SymbolClass($name); }
function _symbol_Q($obj) { return ($obj instanceof SymbolClass); }
// Keywords
function _keyword($name) { return chr(0x7f).$name; }
function _keyword($name) {
if (_keyword_Q($name)) {
return $name;
} else {
return chr(0x7f).$name;
}
}
function _keyword_Q($obj) {
return is_string($obj) && strpos($obj, chr(0x7f)) === 0;
}