break-guile-compiler2.scm 246 B

1234567891011
  1. (use-modules (srfi srfi-9))
  2. (define-record-type <employee>
  3. (make-employee name age (make-employeee 5 5 5))
  4. employee?
  5. (name employee-name)
  6. (age employee-age set-employee-age!)
  7. (salary employee-salary set-employee-salary!))