;; -*-theme-d-*-

;; Copyright (C) 2008-2013 Tommi Höynälänmaa
;; Distributed under GNU General Public License version 3,
;; see file doc/GPL-3.

;; Expected results: error


(define-script (tests test720)

  (import (standard-library core)
	  (standard-library complex)
	  (standard-library console-io))

  (prelink-body (standard-library console-io))
  (prelink-body (standard-library complex))

  (declare gl-cx <complex>)

  (enable-rte-exception-info)
  
  (console-display-line (field-ref gl-cx 're))

  (define gl-cx <complex> (complex 1.5 2.5))

  (console-newline))
