suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

adding number?

Browse Source
This commit is contained in:
Danny Yoo 2011-08-17 16:53:13 -04:00
parent 91a0432abb
commit c0917801d7
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
js-assembler/runtime-src/baselib-primitives.js
View File

@ -964,6 +964,12 @@
}); });
installPrimitiveProcedure(
'number?',
1,
function(MACHINE) {
return isNumber(MACHINE.env[MACHINE.env.length - 1]);
});
installPrimitiveProcedure( installPrimitiveProcedure(

2
lang/kernel.rkt
View File

@ -273,7 +273,7 @@ vector?
;; eof-object? ;; eof-object?
;; bytes? ;; bytes?
;; byte? ;; byte?
;; number? number?
;; complex? ;; complex?
;; real? ;; real?
;; rational? ;; rational?