scheme - スキーム定義エラー(短い)

Question

これは私が作っているインタープリターの一部です。このエラーが発生し続けます：

define not allowed in an expression context in: (define ret1 (list->string wl))

DrScheme バージョン 371、言語標準 (R5RS) を使用しています。

(define (read-command)
  (set! com '( '() ))
  (set! wl (read-as-list))
  (define ret1 (list->string wl))
  (commRead)
  ret1
 )

ここで同様の問題：

    (define repl(
                 lambda()
                  (display "\nUofL>")
                  (define inp (read-command))
                  (define lengtha (length com)