Back to index A B C D E F G H I J K L M N O P Q R S T U V W X Y Z Other

Alphabetic catalog of Language elements D

date+

date+ adds a number of days to a date.

Category Native procedure
Format (date+ date int)
Parameters
datea date
intan integer
Description date+ adds int days to the date date and returns the result as a date.
R4RS Compliance LispMe extension
Examples
(date+ (make-date 1931 1 21) 25072) => [date 13. Sep 1999]

date-day

date-day extracts the day from a date.

Category Native procedure
Format (date-day date)
Parameters
datea date
Description date-day returns the day of month part of a date as an integer value in the range 1..31.
R4RS Compliance LispMe extension
Examples
(date-day (make-date 2001 5 18)) => 18

date-diff

date-diff computes the difference between two dates.

Category Native procedure
Format (date-diff date1 date2)
Parameters
date1a date
date2a date
Description date-diff computes the difference between the dates in days (taking care of month lengths, leap years, of course). The result is be returned as an exact integer. The result is positive when date1 is after date2.
R4RS Compliance LispMe extension
Examples
(date-diff (make-date 2001 5 18) (make-date 1966 1 11) => 12911
(date-diff (make-date 1999 8 11) (make-date 2000 8 11) => -366

date-month

date-month extracts the month from a date.

Category Native procedure
Format (date-month date)
Parameters
datea date
Description date-month returns the month part of a date as an integer value in the range 1..12, where 1 is January, 2 is February, and so on.
R4RS Compliance LispMe extension
Examples
(date-month (make-date 2001 5 18)) => 5

date-time

date-time gets the current date and time.

Category Deprecated
Format (date-time)
Parameters none
Description date-time reads the current date and time from the system clock and returns them as a list of integers in the format (year month day hour minute second day-of-week). day-of-week is 0 for Sunday, 1 for Monday etc. This function is deprecated in V3.0 and later. You should use the foreign type "date" and its assorted functions instead.
R4RS Compliance LispMe extension
Examples
(date-time) => (1999 5 13 23 48 12 4)

date-year

date-year extracts the year from a date.

Category Native procedure
Format (date-year date)
Parameters
datea date
Description date-year returns the year part of a date as an integer value in the range 1904..2031, which is the domain dictated by PalmOS.
R4RS Compliance LispMe extension
Examples
(date-year (make-date 2001 5 18)) => 2001

date?

date? recognizes dates.

Category Primitive procedure
Format (date? obj)
Parameters
objany object
Description date? returns #t for a date and #f for any other object.
R4RS Compliance LispMe extension
Examples
(date? "18.5.2001") => #f
(date? (make-date 2001 5 18)) => #t
(date? (current-ts)) => #f

day-of-week

day-of-week extracts the day of week from a date.

Category Native procedure
Format (day-of-week date)
Parameters
datea date
Description day-of-week returns the day of week of a date as an integer value in the range 0..6, where 0 is Sunday, 1 is Monday, and so on. Thus the result can be used as an index into the PalmOS resources containing the day names, see examples.
R4RS Compliance LispMe extension
Examples
(day-of-week (make-date 2001 5 18)) => 5
(list-ref
   (string-tokenize
      (dm-read-rsrc "tSTR" 10000)
      " #00")
   (day-of-week (make-date 2001 5 18)))
=> "Fr"
(list-ref
   (string-tokenize
      (dm-read-rsrc "tSTR" 10001)
      " #00")
   (day-of-week (make-date 2001 5 18)))
=> "Friday"

dbref?

dbref? recognizes databases.

Category Primitive procedure
Format (dbref? obj)
Parameters
objany object
Description dbref? returns #t for an open database (obtained by dm-open-db) and #f for any other object.
R4RS Compliance LispMe extension
Examples
(dbref? "MemoDB") => #f
(dbref? (dm-open-db "MemoDB" 1)) => #t

define

define associates names with values.

Category Special form
Format
(define var expr)
(define (var formals) expr1 expr2 ...)
Parameters
var a variable name
expr any expression
formals a parameter specification like in a lambda formals list:
  • (define (var par1 ...) ...) means (define var (lambda (par1 ...) ...))
  • (define (var . par) ...) means (define var (lambda par ...))
  • (define (var par1 ... . parn) ...) means (define var (lambda (par1 ... . parn) ...))
expri the expressions which are evaluated in the extended environment when the procedure is called.
Description define associates a name with a value. The first form simply evaluates an expression and binds a name to it. The second form creates a procedure with the parameters formals as described at lambda and binds var to it.

In LispMe, every name used must have been defined before, so every variable used in expri must have been defined in the same binding group (see loading), in a previously loaded memo or manual definition before, or in the case of a local definition, in the enclosing construct. In fact, a group of definitions (like a memo to be loaded, or a list of definitions enclosed in a begin expression entered into the command line) or a group of local definitions is treated like a letrec binding group; this means that every name used in this group must have been defined before or must be defined in this binding group (for mutual recursive definitions). This assures that every name can be statically resolved at compile time and there's no symbol table left to be checked at runtime.

Each source memo must consist of a sequence of define-expressions. You can enter definitions in the REP-loop, and each definition will create a frame with a single variable binding.

Local definitions are allowed whereever an expression sequence is. (The body of a begin-, case-, cond-, lambda-, let-, or letrec-expression) In this case, all definitions must occur before any other expression in the body or you'll see this error.

The return value of a definition is #n in this implementation.

R4RS Compliance See here
Examples
(define pi 3.1415) => doesn't print anything and pi will have the value 3.1415
(define (sq x) (* x x)) => doesn't print anything and the procedure sq is available

delay

delay creates a promise.

Category Special form
Format (delay expr)
Parameters
expr any expression
Description delay packages expr together with the current lexical environment into a promise, which may be evaluated (using force) later. The first time the promise is forced, the delayed expression will be evaluated in the captured environment, and the result will be memoized. Subsequent forcing of this promise always returns the memoized value.
R4RS Compliance Full
Examples
(delay 5) => [prom]
(force (delay 5)) => 5

delete-file

delete-file deletes a memo.

Category Native procedure
Format (delete-file string)
Parameters
stringa string naming a memo
Description delete-file deletes the memo with name string from the MemoPad database. Deleting is done with the DmRemoveRecord function, so the memo is actually deleted (not just its delete-flag set), so if you hotsynced the memo to your desktop, the next HotSync will restore it onto your Pilot, as HotSync has no indication that the memo has been deleted on the Pilot and it assumes that the memo was freshly created on the desktop. So there's no danger loosing valuable memos when they have been hotsynced.

The return value is #n.

R4RS Compliance LispMe extension
Examples
(delete-file "foo") => #n and deletes the memo foo.

delete-record

delete-record deletes a record in an arbitrary Pilot DB.

Category Deprecated use dm-delete-rec instead
Format (delete-record dbname recnum)
Parameters
dbnamea string naming the database
recnuman integer
Description delete-record opens the Pilot database named dbname (case-sensitive!) and deletes the record with index recnum from it (using DmRemoveRecord, not just setting the deleted attribute). #t is returned on success or #f if the database or the index doesn't exist or on other errors.

Warning: Don't delete records from other applications' databases when you're not absolutely sure how DBs are used by them!

R4RS Compliance LispMe extension.
Examples
(delete-record "foo" 3) => #t and the record with index 3 has been deleted from the database foo.

dir

dir returns a list of all memos in the MemoPad database.

Category Native procedure
Format (dir [category])
Parameters
categorya string
Description dir creates a list of the names of all memos in the MemoPad database. A memo name is its first line, truncated to 16 characters like all file names are handled in LispMe. Using the optional category argument, you can restrict the list to the specified category. If the category named doesn't exists, an empty list is returned. Matching of category names is case-sensitive, as PalmOS distinguishes case in category names.

Private records won't appear in the list if you chose Hide private records in the security application.

R4RS Compliance LispMe extension
Examples
(dir) => ("; Built-ins OS2" "; Standard libra" ...) and many more. Note the truncated name.
(dir "foo") => () if you don't have a category named foo.

disasm

disasm disassembles a closure.

Category Native procedure
Format (disasm closure)
Parameters
closurea closure
Description disasm returns the SECD code of a closure (see lambda) as a list. You should never modify this list with set-car! or the like, as you'll probably get this error or even a Fatal exception!

This procedure is intended for debugging purposes and the curious LispMe user. The opcodes are listed in vm.h, but please note that some instructions contain further information in certain bits or environment frames may appear in the result.

R4RS Compliance LispMe extension
Examples
(disasm (lambda (n) (* n 99))) => (1 99 0 15 4)

display

display prints an object in human-readable format.

Category Native procedure
Format (display obj [outport])
Parameters
objany object
outport(optional) an output port
Description display prints an object to the output field or to the output port outport in human-readable format, i.e. strings and chars are not escaped. No space is appended after output. display returns obj. Printing objects is described here. For related information, see newline and write.
R4RS Compliance Full
Examples
(display "Hello, world") => "Hello, world" and prints Hello, world to the output area.
(display '((x y))) => "((x y))" and prints ((x y)) to the output area.

divide

divide divides two integers returning both quotient and remainder.

Category Native procedure
Format (divide int1 int2)
Parameters
int1an integer
int2an integer
Description divide divides two integer numbers and returns both the (integer) quotient and the remainder as a pair. Division by zero is an error.
R4RS Compliance LispMe extension
Examples
(divide 7 3) => (2 . 1)
(divide -5 4) => (-1 . -1)
(divide 1000000000000 13) => (76923076923 . 1)
(divide 3 0) => error

dm-archive-rec

dm-archive-rec marks a record as archived in an open database.

Category Native procedure
Format (dm-archive-rec dbref recnum)
Parameters
dbrefan open database
recnuman integer
Description dm-archive-rec sets the deleted attribute of the record at postition recnum in the database dbref, but leaves the contents intact. Thus, the conduit can archive the data to the PC at the next HotSync and finally remove the actual record from the Palm.

See also dm-delete-rec and dm-remove-rec. On success, #t is returned, otherwise #f.

R4RS Compliance LispMe extension.
Examples
(dm-archive-rec (dm-open-db "Foo" 3) 17) => #t

dm-close-db

dm-close-db closes an open Pilot database.

Category Native procedure
Format (dm-close-db dbref)
Parameters
dbrefan open database
Description dm-close-db closes the open database dbref and returns #t on success. If an error occurs (e.g., the specified database has already been closed), #f is returned.
R4RS Compliance LispMe extension.
Examples
(dm-close-db (dm-open-db "MemoDB" 1)) => #t

dm-create-db

dm-create-db creates a new Pilot database.

Category Native procedure
Format (dm-create-db dbname creator type resource)
Parameters
dbnamea string naming the database
creatora string (4 chars) specifying the creator
typea string (4 chars) specifying the type
resourcea boolean to distinguish data/resource DBs
Description dm-create-db creates a new Pilot database named dbname (case-sensitive!) with creator ID creator and type type. If resource is true, a resource database is created, otherwise a record database is created. You should definitely have a look at the Palm SDK documentation to understand the difference between record and resource databases and the recommended creator/type IDs. The return value is #t on success and #f otherwise.

Please note that the new database is not opened automatically, call dm-open-db to open it.

R4RS Compliance LispMe extension.
Examples
(dm-create-db "FooDB" "myID" "data" #f) => #t and creates a record database

dm-db-info

dm-db-info retrieves general database information.

Category Native procedure
Format (dm-db-info dbref)
Parameters
dbrefan open database
Description dm-db-info returns a list of ten values describing general information about the open database dbref.
  1. database name (string)
  2. open mode (integer, see dm-open-db)
  3. database attributes (integer, see dmHdrAttr* in System/DataMgr.h), any combination of:
    #x0001dmHdrAttrResDBResource database
    #x0002dmHdrAttrReadOnlyread-only database
    #x0004dmHdrAttrAppInfoDirtyapplication infoblock dirty
    #x0008dmHdrAttrBackupdatabase should be backed up
    #x0010dmHdrAttrOKToInstallNewersee DataMgr.h
    #x0020dmHdrAttrResetAfterInstallReset Palm after installation
    #x0040dmHdrAttrCopyPreventiondon't allow copying this database
    #x0080dmHdrAttrStreamit's a file stream database
    #x0100dmHdrAttrHiddendatabase is hidden
    #x0200dmHdrAttrLaunchableDatasee DataMgr.h
    #x8000dmHdrAttrOpendatabase not closed properly
  4. is it a resource database? (boolean), same as bit 0 of attribute
  5. database type (string of 4 chars)
  6. database creator (string of 4 chars)
  7. number of modifications (integer or real)
  8. creation (timestamp)
  9. last modification (timestamp)
  10. last backup (timestamp)
If an error occurs (e.g., the specified database has already been closed), #f is returned.
R4RS Compliance LispMe extension.
Examples
(dm-db-info (dm-open-db "AddressDB" 1)) => ("AddressDB" 1 8 #f "DATA" "addr" 12238 2000-06-22-23-29-01 2001-07-28-01-01-03 2000-11-16-23-25-54)

dm-db-list

dm-db-list lists all databases of a specified type and creator.

Category Native procedure
Format (dm-db-list type creator)
Parameters
typea string of 0 or 4 characters
creatora string of 0 or 4 characters
Description dm-db-list returns a list of all database names having the specified type type and creator creator. Both type and creator can either be a 4 character string to search for an exact match (case-sensitive!) or the empty string as a wildcard.
R4RS Compliance LispMe extension.
Examples
(dm-db-list "" "fbLM") => ("LispMe" "Scratch" "Demo")
(dm-db-list "data" "fbLM") => ("Scratch" "Demo")

dm-db-size

dm-db-size retrieves database size information.

Category Native procedure
Format (dm-db-size dbref)
Parameters
dbrefan open database
Description dm-db-info returns a list of three values describing size information about the open database dbref.
  1. number of records (integer or real)
  2. total bytes used, including overhead (integer or real)
  3. bytes used by records without overhead (integer or real)
If an error occurs (e.g., the specified database has already been closed), #f is returned.
R4RS Compliance LispMe extension.
Examples
(dm-db-size (dm-open-db "AddressDB" 1)) => (282 34521 28797)

dm-delete-db

dm-delete-db deletes an arbitrary Pilot database.

Category Native procedure
Format (dm-delete-db dbname)
Parameters
dbnamea string naming the database
Description dm-delete-db deletes the Pilot database named dbname (case-sensitive!) and all its records, therefore the usual warnings apply :-)

The return value is #t on success and #f otherwise.

R4RS Compliance LispMe extension.
Examples
(dm-delete-db "MemoDB") => #t(don't try this at home!)

dm-delete-rec

dm-delete-rec marks a record as deleted in an open database.

Category Native procedure
Format (dm-delete-rec dbref recnum)
Parameters
dbrefan open database
recnuman integer
Description dm-delete-rec deletes the contents of the record at postition recnum from the database dbref, but leaves the header structure intact and sets the deleted attribute, so that the record will be actually deleted on the next HotSync.

See also dm-remove-rec and dm-archive-rec. On success, #t is returned, otherwise #f.

R4RS Compliance LispMe extension.
Examples
(dm-delete-rec (dm-open-db "Foo" 3) 17) => #t

dm-get-rec-attr

dm-get-rec-attr gets the attributes of a database record.

Category Native procedure
Format (dm-get-rec-attr dbref recnum)
Parameters
dbrefan open database
recnuman integer
Description dm-get-rec-attr reads the attributes of the record with index recnum from the open database dbref. The attributes are represented as an integer which is the logical or of the following bitfields: (see System/DataMgr.h)
#x0fdmRecAttrCategoryMaskthe lower 4 bits are the category number (0-15)
#x10dmRecAttrSecret"secret" record
#x20dmRecAttrBusycurrently in use
#x40dmRecAttrDirtyarchive at next HotSync
#x80dmRecAttrDeletedelete at next HotSync
If an error occurs (e.g., the specified record doesn't exist or the database is a resource database), #f is returned.
R4RS Compliance LispMe extension.
Examples
(dm-get-rec-attr (dm-open-db "AddressDB" 1) 112) => 65 (=category 1, dirty)

dm-insert-rec

dm-insert-rec inserts a new record into an open database.

Category Native procedure
Format (dm-insert-rec dbref recnum rec)
Parameters
dbrefan open database
recnuman integer
reca string
Description dm-insert-rec creates a new record in the database dbref. The record is filled with the contents of the string rec and inserted at position recnum into the database. Remember that records in a database are accessed by contiguous integer indices and thus all records at indices greater recnum are shifted upwards.

recnum may be larger than the number of records in the database, in this case the new record is inserted at the very end. In any case, on success the actual record number is returned, on failure #f. Use dm-open-db to open a database.

R4RS Compliance LispMe extension.
Examples
(dm-insert-rec (dm-open-db "Foo" 3) 9999 "Test") => 17 (the actual new index)

dm-insert-rsrc

dm-insert-rsrc inserts a new resource into an open database.

Category Native procedure
Format (dm-insert-rsrc dbref type id res)
Parameters
dbrefan open (resource) database
typea string of 4 characters
idan integer
resa string
Description dm-insert-rsrc creates a new resource record in the resource database dbref. The record is filled with the contents of the string res and inserted at resource id id under resource type type into the database.

On success, #t is returned, on failure #f.

R4RS Compliance LispMe extension.
Examples
(dm-insert-rsrc *resdb* "tSTR" 1234 "Hello") => #t

dm-num-recs

dm-num-recs counts the records in a database.

Category Native procedure
Format (dm-num-recs dbref)
Parameters
dbrefan open database
Description dm-num-recs returns the number of records in the open database dbref. If an error occurs (e.g., the specified database has already been closed), #f is returned.
R4RS Compliance LispMe extension.
Examples
(dm-num-recs (dm-open-db "AddressDB" 1)) => 282

dm-open-db

dm-open-db opens an arbitrary Pilot database.

Category Native procedure
Format (dm-open-db dbname mode)
Parameters
dbnamea string naming the database
modean integer (open mode)
Description dm-open-db opens the Pilot database named dbname (case-sensitive!) in mode mode and returns a reference to the open database. The open mode can be any disjunction of the bitflags (see System/DataMgr.h)
#x01dmModeReadOnlyread-only access to database
#x02dmModeWritewrite-only access to database
#x03dmModeReadWriteread/write access to database
#x04dmModeLeaveOpen(ignored in LispMe)
#x08dmModeExclusivedon't let anyone else open it
#x10dmModeShowSecretinclude secret records
If opening fails (e.g. the database doesn't exist), a special "empty" database reference printing [no dbref] is returned, which makes all database accesses fail.

Garbage collection automatically closes unused databases, but you can (and should) close a database explicitely with dm-close-db.

R4RS Compliance LispMe extension.
Examples
(dm-open-db "MemoDB" 5) => [dbref 0x0001 MemoDB]

dm-read-rec

dm-read-rec reads a record from an arbitrary database.

Category Native procedure
Format (dm-read-rec dbref recnum)
Parameters
dbrefan open database
recnuman integer
Description dm-read-rec reads the record with index recnum from the open database dbref. The record is returned as a string. If an error occurs (e.g., the specified record doesn't exist or the database is a resource database), #f is returned. Use dm-open-db to open a database.
R4RS Compliance LispMe extension.
Examples
(dm-read-rec (dm-open-db "MemoDB" 0) 42) => "Whatever your memo contains#00"

dm-read-rsrc

dm-read-rsrc reads a resource from any open resource database.

Category Native procedure
Format (dm-read-rsrc type id)
Parameters
typea string of 4 characters
idan integer
Description dm-read-rsrc searches all open resource databases for a resource of type type with resource id id and returns it as a string. If the resource is not found, #f is returned.

Open resource databases are tracked by PalmOS itself. The last opened resource database is searched first. In addition to all explicitely opened resource databases, LispMe itself and System resources are searched (last).

The type parameter determines the type of the resource to be read and is written as a string of 4 bytes, which is more readable than the Pilot API convention which builds a 32-bit integer from the 4 bytes. Please refer to the PalmOS documentation for more detailed information about Pilot resources.

R4RS Compliance LispMe extension.
Examples
(dm-read-rsrc "tver" 1) => "3.0#00", the version string from LispMe itself.

dm-remove-rec

dm-remove-rec (physically) removes a record from an open database.

Category Native procedure
Format (dm-remove-rec dbref recnum)
Parameters
dbrefan open database
recnuman integer
Description dm-remove-rec removes the record at postition recnum from the database dbref. The record is physically removed from the database, in contrast to dm-archive-rec and dm-delete-rec.

Since records in a database are accessed by contiguous integer indices, all records with indices > recnum are shifted downards. On success, #t is returned, otherwise #f.

R4RS Compliance LispMe extension.
Examples
(dm-remove-rec (dm-open-db "Foo" 3) 17) => #t

dm-remove-rsrc

dm-remove-rsrc removes a resource from an open database.

Category Native procedure
Format (dm-remove-rsrc dbref type id)
Parameters
dbrefan open (resource) database
typea string of 4 characters
idan integer
Description dm-remove-rsrc removes the resource with type type and resource id id from the resource database dbref. The resource is physically removed, there are no logical deletion functions for resources. On success, #t is returned, on failure #f.
R4RS Compliance LispMe extension.
Examples
(dm-remove-rsrc *resdb* "tSTR" 1234) => #t

dm-rsrc-db?

dm-rsrc-db? distinguishes record from resource databases.

Category Native procedure
Format (dm-rsrc-db? dbref)
Parameters
dbrefan open database
Description dm-rsrc-db? returns #t if the open databas dbref is a resource database, #f if it is a record database. It must be a valid database referenece a priori.
R4RS Compliance LispMe extension
Examples
(dm-rsrc-db? *resdb*) => #t

dm-set-rec-attr

dm-set-rec-attr sets the attributes of a database record.

Category Native procedure
Format (dm-set-rec-attr dbref recnum attr)
Parameters
dbrefan open database
recnuman integer
attran integer
Description dm-set-rec-attr sets the attribute byte of the record with index recnum in the open database dbref to attr. The attributes are represented as an integer which is the logical or of the following bitfields: (see System/DataMgr.h)
#x0fdmRecAttrCategoryMaskthe lower 4 bits are the category number (0-15)
#x10dmRecAttrSecret"secret" record
#x20dmRecAttrBusycurrently in use
#x40dmRecAttrDirtyarchive at next HotSync
#x80dmRecAttrDeletedelete at next HotSync
On success, #t is returned, if an error occurs (e.g., the specified record doesn't exist or the database is a resource database), #f is returned.

Warning: Don't change the "deleted" bit, it may cause memory corruption!

R4RS Compliance LispMe extension.
Examples
(dm-set-rec-attr (dm-open-db "AddressDB" 1) 112 #x43) => #t (moved to category 3, still dirty)

dm-update-rec

dm-update-rec updates an existing record in an open database.

Category Native procedure
Format (dm-update-rec dbref recnum rec)
Parameters
dbrefan open database
recnuman integer
reca string
Description dm-update-rec locates the record with index recnum in the database dbref and replaces it by the contents of the string rec. The updated record is marked as dirty.

On success, recnum is returned, on failure #f.

R4RS Compliance LispMe extension.
Examples
(dm-update-rec (dm-open-db "Foo" 3) 17 "NewTest") => 17

dm-update-rsrc

dm-update-rsrc updates an existing resource in an open database.

Category Native procedure
Format (dm-update-rsrc dbref type id res)
Parameters
dbrefan open (resource) database
typea string of 4 characters
idan integer
resa string
Description dm-update-rsrc locates the resource with type type and resource id id in the resource database dbref and replaces its contents by res.

On success, #t is returned, on failure #f.

R4RS Compliance LispMe extension.
Examples
(dm-update-rsrc *resdb* "tSTR" 1234 "Hi") => #t

do

do is a general looping construct.

Category Special form (compiler extension)
Format (do ((var init [step]) ...) (test expr ...) (stmt ...))
Parameters
vari variables
initi any expression. Each variable is initialized by the corresponding expression
stepi any expression. Each expression is evaluated and the corresponding variable is rebound to the result for the next iteration. If no step is specified, the variable is rebound to its value.
testif this predicate evaluates to true, the iteration is stopped and the following
exprj expressions are evaluated in sequence. The last value is the result of the entire do form.
stmtk any LispMe expression, which are evaluated in sequence when test is false.
Description do is a general looping mechanism. First, each initi is evaluated in an unspecified order and each vari is bound to the corresponding value.

On each iteration, test is evaluated first. When it is true, the exprj are evaluated in left to right order and the value of the last one is returned as the value of the whole do expression.

If it is false, the stmtk are evaluated in left to right order. Next, all vari are rebound by evaluating the corresponding stepi and the next iteration begins.

R4RS Compliance Full
Examples
(do ((i 1 (+ i 1)) (j 1 (* i j))) ((> i 6) j)) => 720

draw

draw draws a line.

Category Native procedure
Format (draw x y)
Parameters
xan integer
yan integer
Description draw draws a line from the current point stored in *gstate* to (x,y) using the colors, drawing mode and drawing pattern stored in *gstate*. After that, the current point is updated to (x,y).

See here for details on the graphic state. The return value is #n to avoid trashing the graphics.

R4RS Compliance LispMe extension
Examples
(draw 100 80) => #n and draws a line to (100,80) as described above.

Back to index A B C D E F G H I J K L M N O P Q R S T U V W X Y Z Other