Macro

Summary

Binds the elements of a rectangle to four variables, and if the rectangle has a non-zero area, executes a body of code.

Package

graphics-ports

Signature

unless-empty-rect-bind (( x y width height ) rectangle ) &body body => result

Arguments

x

A variable.

y

A variable.

width

A variable.

height

A variable.

rectangle

A rectangle.

body

A body of Lisp code.

Values

result

The return value of the last form executed in body .

Description

The macro unless-empty-rect-bind binds x , y , width , and height to the appropriate values from rectangle and if the width and height are both positive, executes the body forms.