Example of let-syntax local macro

macro1.scm

(define-syntax section
  (syntax-rules ()
    [(_ type (instruction ...) ... )
     
     (let-syntax ([b (syntax-rules ()
                       [(_ i)  (printf "~s~%" 'i )]
                       [(_ i op1)  (printf "~s ~s~%" 'i 'op1)]
                       [(_ i op1 op2)  (printf "~s ~s, ~s~%" 'i 'op1 'op2)])])
       (begin
         (printf "~s ~s~%" 'section 'type)
         (b instruction ...) ...
          ))]))

(section .text
         (hello)
         (world)
         (push 1))

; section .text
; hello
; world
; push 1