Welcome to the CHICKEN Scheme pasting service

Death Number pasted by FragmentedCurve on Fri Apr 16 15:15:08 2021

(define DEATH-NUMBER 32763)

(apply string-append
	   (vector->list (make-vector
					  (sub1 DEATH-NUMBER)
					  "A")))
(print "HERE I AM")	   

(apply string-append
	   (vector->list (make-vector
					  DEATH-NUMBER
					  "A")))
                      
(print "You'll never find me!")

Compiled version added by sjamaan on Fri Apr 16 16:00:38 2021

;; Try compiling this; it will take a while but eventually succeed.  Running it causes a hang though, even though it has no "apply" call (instead it builds a very big "av2")

(define-for-syntax DEATH-NUMBER 32763)

(print "HERE I AM")    

(define-syntax make-big-call
  (er-macro-transformer
    (lambda (e r c)
      `(string-append ,@(vector->list (make-vector DEATH-NUMBER "A"))))))

(make-big-call)
                      
(print "You'll never find me!")

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Type in the text below:
  __  __                    
 / _|/ _|_   ____   ___ __  
| |_| |_\ \ / /\ \ / / '_ \ 
|  _|  _|\ V /  \ V /| |_) |
|_| |_|   \_/    \_/ | .__/ 
                     |_|    
Visually impaired? Let me spell it for you (wav file) download WAV