we have a new parser and can parse [] and {} for vectors and hm's
This commit is contained in:
+3
-3
@@ -5,11 +5,11 @@
|
||||
`(set-type!
|
||||
(define
|
||||
;; The function definition
|
||||
(,(string->symbol (concat-strings "make-" (symbol->string name))) @members)
|
||||
(,(string->symbol (concat-strings "make-" (symbol->string name))) ,@members)
|
||||
;; The docstring
|
||||
,(concat-strings "This is the handle to an object of the class " (symbol->string name))
|
||||
;; the body
|
||||
@body
|
||||
,@body
|
||||
(let ,(zip members members)
|
||||
(set-type!
|
||||
(lambda args
|
||||
@@ -22,4 +22,4 @@
|
||||
:constructor)))
|
||||
|
||||
(define-syntax (-> obj meth . args)
|
||||
`(,obj ',meth @args))
|
||||
`(,obj ',meth ,@args))
|
||||
|
||||
Reference in New Issue
Block a user