home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / scheme / pseudo-s / pseudo_2.lha / ssig.pso < prev    next >
Encoding:
Text File  |  1992-02-17  |  14.6 KB  |  211 lines
  1. ; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SCHEME-TRANSLATOR; -*-
  2.  
  3. ; This file was generated by Pseudoscheme 2.8a
  4. ;  running in Lucid Common Lisp 4.0.1
  5. ;  from file /amd/night/b/jar/pseudo/ssig.scm
  6.  
  7. (SCHI:BEGIN-TRANSLATED-FILE)
  8. (LOCALLY (DECLARE (SPECIAL REVISED^4-SCHEME-SIG))
  9.          (SETQ REVISED^4-SCHEME-SIG (MAKE-SIGNATURE 'SCHEME::REVISED^4-SCHEME
  10.                                                     '(SCHEME::AND SCHEME::BEGIN
  11.                                                       SCHEME::CASE SCHEME::COND
  12.                                                       SCHEME::DEFINE
  13.                                                       SCHEME::DELAY SCHEME::DO
  14.                                                       SCHEME::IF SCHEME::LAMBDA
  15.                                                       SCHEME::LETREC
  16.                                                       SCHEME::LET SCHEME::LET*
  17.                                                       SCHEME::OR
  18.                                                       SCHEME::QUASIQUOTE
  19.                                                       SCHEME::QUOTE
  20.                                                       SCHEME::SET!
  21.                                                       SCHEME::UNQUOTE
  22.                                                       SCHEME::UNQUOTE-SPLICING
  23.                                                       SCHEME::DEFINE-SYNTAX
  24.                                                       SCHEME::LET-SYNTAX
  25.                                                       SCHEME::LETREC-SYNTAX
  26.                                                       SCHEME::SYNTAX-RULES
  27.                                                       SCHEME::=> SCHEME::ELSE
  28.                                                       SCHEME::* SCHEME::+
  29.                                                       SCHEME::- SCHEME::/
  30.                                                       SCHEME::< SCHEME::<=
  31.                                                       SCHEME::= SCHEME::>
  32.                                                       SCHEME::>= SCHEME::APPLY
  33.                                                       SCHEME::BOOLEAN?
  34.                                                       SCHEME::CALL-WITH-CURRENT-CONTINUATION
  35.                                                       SCHEME::CAR SCHEME::CDR
  36.                                                       SCHEME::CHAR->INTEGER
  37.                                                       SCHEME::CHAR-READY?
  38.                                                       SCHEME::CLOSE-INPUT-PORT
  39.                                                       SCHEME::CLOSE-OUTPUT-PORT
  40.                                                       SCHEME::COMPLEX?
  41.                                                       SCHEME::CONS
  42.                                                       SCHEME::CURRENT-INPUT-PORT
  43.                                                       SCHEME::CURRENT-OUTPUT-PORT
  44.                                                       SCHEME::DENOMINATOR
  45.                                                       SCHEME::EOF-OBJECT?
  46.                                                       SCHEME::EQ? SCHEME::EQV?
  47.                                                       SCHEME::EXACT->INEXACT
  48.                                                       SCHEME::EXACT?
  49.                                                       SCHEME::IMAG-PART
  50.                                                       SCHEME::INEXACT->EXACT
  51.                                                       SCHEME::INEXACT?
  52.                                                       SCHEME::INPUT-PORT?
  53.                                                       SCHEME::INTEGER->CHAR
  54.                                                       SCHEME::INTEGER?
  55.                                                       SCHEME::LOAD
  56.                                                       SCHEME::MAGNITUDE
  57.                                                       SCHEME::MAKE-POLAR
  58.                                                       SCHEME::MAKE-RECTANGULAR
  59.                                                       SCHEME::MAKE-STRING
  60.                                                       SCHEME::MAKE-VECTOR
  61.                                                       SCHEME::MODULO
  62.                                                       SCHEME::NEWLINE
  63.                                                       SCHEME::NOT SCHEME::NULL?
  64.                                                       SCHEME::NUMBER?
  65.                                                       SCHEME::NUMERATOR
  66.                                                       SCHEME::OPEN-INPUT-FILE
  67.                                                       SCHEME::OPEN-OUTPUT-FILE
  68.                                                       SCHEME::OUTPUT-PORT?
  69.                                                       SCHEME::PAIR?
  70.                                                       SCHEME::PEEK-CHAR
  71.                                                       SCHEME::PROCEDURE?
  72.                                                       SCHEME::QUOTIENT
  73.                                                       SCHEME::RATIONAL?
  74.                                                       SCHEME::READ-CHAR
  75.                                                       SCHEME::REAL-PART
  76.                                                       SCHEME::REAL?
  77.                                                       SCHEME::REMAINDER
  78.                                                       SCHEME::SET-CAR!
  79.                                                       SCHEME::SET-CDR!
  80.                                                       SCHEME::STRING
  81.                                                       SCHEME::STRING->SYMBOL
  82.                                                       SCHEME::STRING-LENGTH
  83.                                                       SCHEME::STRING-REF
  84.                                                       SCHEME::STRING-SET!
  85.                                                       SCHEME::STRING?
  86.                                                       SCHEME::SYMBOL->STRING
  87.                                                       SCHEME::SYMBOL?
  88.                                                       SCHEME::TRANSCRIPT-ON
  89.                                                       SCHEME::TRANSCRIPT-OFF
  90.                                                       SCHEME::VECTOR-LENGTH
  91.                                                       SCHEME::VECTOR-REF
  92.                                                       SCHEME::VECTOR-SET!
  93.                                                       SCHEME::VECTOR?
  94.                                                       SCHEME::WRITE-CHAR
  95.                                                       SCHEME::APPEND
  96.                                                       SCHEME::ASSOC
  97.                                                       SCHEME::ASSQ SCHEME::ASSV
  98.                                                       SCHEME::ABS SCHEME::ACOS
  99.                                                       SCHEME::ANGLE
  100.                                                       SCHEME::ASIN SCHEME::ATAN
  101.                                                       SCHEME::CAAAAR
  102.                                                       SCHEME::CAAADR
  103.                                                       SCHEME::CAADAR
  104.                                                       SCHEME::CAADDR
  105.                                                       SCHEME::CAAAR
  106.                                                       SCHEME::CAADR
  107.                                                       SCHEME::CAAR
  108.                                                       SCHEME::CADAAR
  109.                                                       SCHEME::CADADR
  110.                                                       SCHEME::CADDAR
  111.                                                       SCHEME::CADDDR
  112.                                                       SCHEME::CADAR
  113.                                                       SCHEME::CADDR
  114.                                                       SCHEME::CADR
  115.                                                       SCHEME::CALL-WITH-INPUT-FILE
  116.                                                       SCHEME::CALL-WITH-OUTPUT-FILE
  117.                                                       SCHEME::CDAAAR
  118.                                                       SCHEME::CDAADR
  119.                                                       SCHEME::CDADAR
  120.                                                       SCHEME::CDADDR
  121.                                                       SCHEME::CDAAR
  122.                                                       SCHEME::CDADR
  123.                                                       SCHEME::CDAR
  124.                                                       SCHEME::CDDAAR
  125.                                                       SCHEME::CDDADR
  126.                                                       SCHEME::CDDDAR
  127.                                                       SCHEME::CDDDDR
  128.                                                       SCHEME::CDDAR
  129.                                                       SCHEME::CDDDR
  130.                                                       SCHEME::CDDR
  131.                                                       SCHEME::CEILING
  132.                                                       SCHEME::CHAR-ALPHABETIC?
  133.                                                       SCHEME::CHAR-CI<=?
  134.                                                       SCHEME::CHAR-CI<?
  135.                                                       SCHEME::CHAR-CI=?
  136.                                                       SCHEME::CHAR-CI>=?
  137.                                                       SCHEME::CHAR-CI>?
  138.                                                       SCHEME::CHAR-DOWNCASE
  139.                                                       SCHEME::CHAR-LOWER-CASE?
  140.                                                       SCHEME::CHAR-NUMERIC?
  141.                                                       SCHEME::CHAR-UPCASE
  142.                                                       SCHEME::CHAR-UPPER-CASE?
  143.                                                       SCHEME::CHAR-WHITESPACE?
  144.                                                       SCHEME::CHAR<=?
  145.                                                       SCHEME::CHAR<?
  146.                                                       SCHEME::CHAR=?
  147.                                                       SCHEME::CHAR>=?
  148.                                                       SCHEME::CHAR>?
  149.                                                       SCHEME::CHAR? SCHEME::COS
  150.                                                       SCHEME::DISPLAY
  151.                                                       SCHEME::EQUAL?
  152.                                                       SCHEME::EVEN? SCHEME::EXP
  153.                                                       SCHEME::EXPT
  154.                                                       SCHEME::FLOOR
  155.                                                       SCHEME::FOR-EACH
  156.                                                       SCHEME::FORCE SCHEME::GCD
  157.                                                       SCHEME::LCM SCHEME::LIST
  158.                                                       SCHEME::LOG
  159.                                                       SCHEME::LENGTH
  160.                                                       SCHEME::LIST->STRING
  161.                                                       SCHEME::LIST->VECTOR
  162.                                                       SCHEME::LIST-REF
  163.                                                       SCHEME::LIST-TAIL
  164.                                                       SCHEME::LIST? SCHEME::MAP
  165.                                                       SCHEME::MAX
  166.                                                       SCHEME::MEMBER
  167.                                                       SCHEME::MEMQ SCHEME::MEMV
  168.                                                       SCHEME::MIN
  169.                                                       SCHEME::NEGATIVE?
  170.                                                       SCHEME::NUMBER->STRING
  171.                                                       SCHEME::ODD?
  172.                                                       SCHEME::RATIONALIZE
  173.                                                       SCHEME::POSITIVE?
  174.                                                       SCHEME::READ
  175.                                                       SCHEME::REVERSE
  176.                                                       SCHEME::ROUND SCHEME::SIN
  177.                                                       SCHEME::SQRT
  178.                                                       SCHEME::STRING->LIST
  179.                                                       SCHEME::STRING->NUMBER
  180.                                                       SCHEME::STRING-APPEND
  181.                                                       SCHEME::STRING-CI<=?
  182.                                                       SCHEME::STRING-CI<?
  183.                                                       SCHEME::STRING-CI=?
  184.                                                       SCHEME::STRING-CI>=?
  185.                                                       SCHEME::STRING-CI>?
  186.                                                       SCHEME::STRING-COPY
  187.                                                       SCHEME::STRING-FILL!
  188.                                                       SCHEME::STRING<=?
  189.                                                       SCHEME::STRING<?
  190.                                                       SCHEME::STRING=?
  191.                                                       SCHEME::STRING>=?
  192.                                                       SCHEME::STRING>?
  193.                                                       SCHEME::SUBSTRING
  194.                                                       SCHEME::TAN
  195.                                                       SCHEME::TRUNCATE
  196.                                                       SCHEME::VECTOR
  197.                                                       SCHEME::VECTOR->LIST
  198.                                                       SCHEME::VECTOR-FILL!
  199.                                                       SCHEME::WITH-INPUT-FROM-FILE
  200.                                                       SCHEME::WITH-OUTPUT-TO-FILE
  201.                                                       SCHEME::WRITE
  202.                                                       SCHEME::ZERO?)
  203.                                                     '(SCHEME::AND-AUX
  204.                                                       SCHEME::CASE-AUX
  205.                                                       SCHEME::MAKE-PROMISE
  206.                                                       SCHEME::OR-AUX
  207.                                                       SCHEME::UNSPECIFIED
  208.                                                       SCHEME::=>-AUX))))
  209. (SCHI:SET-FUNCTION-FROM-VALUE 'REVISED^4-SCHEME-SIG
  210.                               'SCHEME::REVISED^4-SCHEME-SIG)
  211.