Permalink
Browse files

Add ident?

  • Loading branch information...
1 parent 40de909 commit f0021dcff40276351d38cbb90c96823b33aa068e @eholk committed Sep 10, 2012
Showing with 3 additions and 0 deletions.
  1. +3 −0 lib/elegant-weapons/helpers.scm
@@ -5,6 +5,7 @@
iota
define-match
andmap
+ ident?
binop?
relop?
float?
@@ -101,6 +102,8 @@
(and (not (null? ls))
(or (p (car ls)) (ormap p (cdr ls))))))
+(define ident? symbol?)
+
(define binop?
(lambda (op)
(case op

0 comments on commit f0021dc

Please sign in to comment.