SYSTEM FOR CONVERSION OF LOOP FUNCTIONS TO CONTINUATION-PASSING STYLE

Abstract: A compiler and compilation method (10) for processing a source program (11) in a programming language in the Scheme/Lisp family into a representation known as continuation-passing style (CPS) before generating object code, with optimization (16) also being involved in the processing. To simplify the code generator (12) and optimization (16), and to allow the same code generator (12) to be used for both non-loop as well as for loop functions, novel algorithms are described which find in the standard CPS intermediate tree sets of non-continuation lambda expressions with a common continuation (15), which can then be converted to optmized CPS code (16) that can be processed by the same code generator (12) as non-loop continuation functions.

Description: SYSTEM FOR CONVERSION OF LOOP FUNCTIONS TO CONTTNI JATTON-PASSI G STYT .F This invention relates to systems for processing programming language code in the Scheme/Lisp family of programming languages representing loops into continuation functions. BACKORQΪJNP OF INVENTION Several compilation systems for programming languages in the Scheme/Lisp family of programming languages convert a source program into a representation know as continuation-passing style, or CPS, in order to analyze and optimize the program being compiled. CPS represents the program as a particular organization of lambda expressions. CPS representation makes flow-of-control information explicit through the use of continuations. Although continuations are formally functions, they differ from non-continuation lambda expressions (NCLEs) in that they do not themselves have continuation arguments. Except in special cases, NCLEs must be able to "return" to their callers by invoking a continuation argument; typically this is realized by generating a call instruction when invoking the NCLE. Continuation functions, on the other hand, can always be invoked with just a branch instruction. For an explanation in detail of standard CPS conversion, as well as a description of example algorithms, reference is made to "Rabbit: A Compiler For Scheme" by Steele, published in MIT Artificial Intelligence Laboratory Technical Report 474, May 1978 (especially pp. 56-59); and "Orbit: An Optimizing Compiler For Scheme," by Kranz, YALEU/DCS RR-632, Feb. 1988 (especially pp. 20-26) available from the Yale University Library, the contents of which publications are herein incorporated by reference. For further background, see also "Compiling With Continuations" by Appel, publ. 1992 by Cambridge University Press. To summarize briefly, CPS conversion makes continuations explicit by transforming the program to continuation-passing style. Each source language lambda expression is given an additional formal parameter bound to a continuation to be invoked with the result of executing the body. Each call is provided with a corresponding extra argument, the continuation to the call. An intermediate node tree known as the CPS tree is produced. More specifically, the transformation or conversion consists of adding an extra argument, a continuation, to each combination. Each lambda expression is similarly changed by introducing an extra formal parameter to correspond to the continuation it will be passed. After the transformation, the notions of procedure call and return have been unified; i.e., procedures no longer return. Instead, a procedure does a computation and calls its continuation with the result of the computation as argument. A typical standard CPS compiler distinguishes between lambda expressions which are continuations and those which are not continuations and processes them differently. Scheme and related programming languages use recursion in the source language to express iteration. A typical standard CPS compiler detects these "tail recursion loops", and uses a different code generation algorithm for loop functions than for non-loop functions. SUMMARY OF INVENTION An object of the invention is a system for converting non-continuation functions which represent loops and other constructs in programming languages in the Scheme/Lisp family into continuation functions. A further object of the invention is a system for processing non-continuation functions which represent loops so as to simplify code generation and optimization. In accordance with one aspect of the invention, as part of a compiling system of source code into object code during which the source program is converted into CPS, a novel loop-conversion algorithm is provided which converts non-continuation functions which represent loops and other constructs into continuation functions. This simplifies the code generator and optimizer by presenting fewer distinct cases to consider, since the same code generator can be used for both loop and non-loop functions. In a preferred embodiment, the CPS loop conversion algorithm performs, broadly, two distinct tasks, each of which is believed novel. The first part identifies in the standard CPS code (typically in the form of a CPS tree) a "loop set," which is a set of NCLEs with the property that every reference to every name of the NCLEs is a call, and each such call is either a tail call from some member of the set, or a call with some distinguished continuation argument. The first part thus identifies both the set members and the distinguished continuation common to the set. The second part takes the loop set and its common continuation identified in the first part and converts the set members into continuations in accordance with the invention. Although the term "loop set" is chosen because loops are the most important case to which the algorithm of the invention applies, the definition given above actually doesn't require that a loop exist, and the algorithm does apply to non-loop situations, as will become clearer from the examples given hereinafter. The above and further objects, details and advantages of the present invention will become apparent from the following detailed description of preferred embodiments thereof, when read in conjunction with the accompanying drawings. SUMMARY OF DRAWINGS Fig. 1 is a block diagram showing a compiler flow chart employing one form of the CPS conversion algorithm in accordance with the invention; Fig. 2 is a flow chart for processing code in accordance with the invention; Fig. 3 is a block diagram of a typical computer for processing source code into object code. DETAILED DESCRIPTION OF PREFERRED EMBODIMENT Fig. 1 illustrates a typical compiler flow chart for generating object code from source code in the Scheme/List family of programming languages. The Fig. 1 depiction is an abbreviated version of the flow chart appearing on page 118 of the referenced Steele publication. The function of a compiler, indicated generally at 10, is to process source code 11 into object code 12. In the process, in the Scheme/List family, the source code usually undergoes some preliminary processing 13. Afterwards, the processed code is converted into standard CPS 15, and undergoes optimization 16. Optimization can also be performed before the CPS conversion. Finally, after further processing, object code is generated 12. Fig. 3 is a block diagram of a typical computer for processing source code into object code with a suitable compiler program. As is well known, the computer 30 comprises the usual processor 31 , an operating system 32, and memory 34, including memory 35 for storing programs to be run, such as a CPS compiler. The present invention is concerned with block 16 (Fig. 1), and in particular to the conversion of standard CPS to an optimized form of CPS of code representing loops and other code in order to simplify object code generation. The CPS loop conversion algorithm of the invention actually is comprised of two parts, which could be considered two distinct algorithms. The first part identifies in the inputted standard CPS a "loop set," which is a set of NCLEs with the property that every reference to every name of the NCLEs is a call, and each such call is either a tail call from some member of the set, or a call with some distinguished continuation argument. The first part identifies both the set members and the distinguished continuation. The input to the first part is the CPS tree typically formed when the source code undergoes standard conversion to CPS. The second part takes a loop set and its common continuation obtained in the first part and converts the set members into the optimized continuations. The first part in pseudocode is as follows: The procedure is-a-loop-p determines whether a set S of named NCLEs is part of a loop set with a particular continuation, C. If it is, is-a-loop-p returns the smallest extension of S which makes a loop; otherwise, is-a-loop-p returns false. is-a-loop-p (S, C); for every element L of S for every reference R to the name of L if R is used as a call argument rather than as a function then return false else if the continuation in the call to R is a lambda node then if the continuation is not C then return false else continue else // the continuation in the call to R is a reference to a variable let V be the variable whose reference is the continuation in the call to R. let VL be the lambda node that binds V. if V=C then continue else if VL has is a member of S then continue else if VL has a name then return is-a-loop-p (S plus VL, C) else return false next R next L return loop-set The procedure find-loop-set-and-continuation takes a set S of named NCLEs and determines whether there's a continuation relative to which the named NCLEs can be extended into a loop. If so, returns the full loop set plus the continuation; otherwise, returns false. find-loop-set-and-continuation (S): for every element L of S for every reference R to the name of L if R is used as a call argument rather than as a function then return false else if the continuation in the call to R is a lambda node then let C = the continuation in the Call to R let S'= is-a-loop-p (S, C) if S' = false then return false else return S' and C else // the continuation in the call to R is a reference to a variable let V be the variable whose reference is the continuation in the call to R. let VL be the lambda node that binds V. if VL is a member of loop-set then continue else if is-a-loop-p (S, V) then return is-a-loop-p (S, V) and V else if VL has a name then return find-loop-set-and-continuation (loop-set plus VL) else return false next R next L return false Given a loop set S and their common continuation C found in the first part, convert-loop converts all the members of S into 30 continuation lambdas. Exactly one of three conditions must be true of S and C in the found loop set: (a) C is a continuation lambda; (b) C is a continuation variable, and every member of S is within the scope of C; or (c) C is a continuation variable and at least one member of S is outside the scope of C. The second part in pseudocode is as follows with condition or case (a) expressed in the first IF statement, condition or case (b) expressed in the first ELSE statement, and condition or case (c) expressed in the second ELSE statement: convert-loop (S, C): if C is a continuation lambda then let V be a new continuation variable. Insert into the CPS tree a call node which binds V to C, just above the call node in which C originally appears. Replace C by a reference to V. return convert-loop (S, V) else if C is continuation variable and every member of S is within the scope of C then for every element of L of S Change L to be a continuation lambda Let V be the continuation variable bound by L for every reference R to V replace R by a reference to C for every reference R to the name of L delete the continuation in the call to R else // C is a continuation variable and some member of S is // outside the scope of C. Because of the definition // of S and C, every reference to every member of S // is either within the scope of C or within the // scope of some member of S. Therefore it's // possible to move the members of S: Remove the members of S from the CPS tree, along with the names. Just below the lambda node which binds C, introduce a new binding call which binds all the members of S to their names. // Now all the members of S are within the scope of C. return convert-loop (S, C) Note that when conditions (a) and (c) are satisfied, convert-loop repeats, until condition (b) is satisfied and the routine is exited. Summarizing, when the non-continuation loop or other functions comprise a set of named NCLEs with the property that every reference to every name of the NCLEs is a call, and those references that are not tail-calls from some member of the set, are called with the identical continuation argument (either a continuation lambda or a continuation variable), determined by executing the procedures is-a-loop-p and find-loop-set-and-continuation of the first part, then one of the three specified conditions must be true: (a) c is a continuation lambda; (b) c is a continuation variable, and all the members of S fall within the scope of c; (c) c is a continuation variable, and at least one member of S falls outside the scope of c. Then, it is straightforward to provide the conversion to the optimized CPS using the convert-loop procedure of the second part. This will be illustrated with the following examples. Example 1: Normal conversion of a fragment in the Dylan programming language which is in the Lisp/Scheme family: (bind-methods ((fact (i fϊ) (if(<= i 0) ff (fact (- i l) (* i ff))))) (+ (fact n 1) 3)) to standard CPS yields the following CPS tree: (letrec ((fact (k i fϊ) (if(<= i 0) (lambda ( ) (k fϊ)) (lambda ( ) (fact k (- i 1) (* i fϊ)))))) (fact (lambda (v) (+ C v 3)) n 1)) where C is the continuation which would receive the value of the original Dylan expression. Prior art technology would attempt to recognize that fact is a loop, and special code generators would be used to arrange for calls to fact to be implemented with branch instructions, rather than with call instructions. Also, references to k would have to be treated specially, since no actual continuation would be passed. The loop set found by the algorithm first part of the invention when the foregoing CPS tree is inputted consists of just the definition of the variable fact; the distinguished continuation is the lambda expression, (lambda (v) (+ C v 3)), which makes this an example of case (a). The loop conversion algorithm of the invention changes the CPS tree to: (letrec ((fact (k i ff) (if(<=i 0) (lambda ( ) (k ff)) (lambda ( ) (fact k (- i 1) (* i ff)))))) ((lambda (g) (fact g n l)) (lambda (v) (+ C v 3)))) which is now handled as case (c), with the variable g being the distinguished continuation. Running the loop conversion algorithm of the invention again moves the binding of fact entirely within the scope of g: ((lambda (g) (letrec ((fact (k i ff) (if(<= i 0 ) (lambda ( ) (k ff)) (lambda ( ) (fact k (- i 1 ) (* i fϊ)))))) (fact g n l))) (lambda (v) (+ C v 3))) This version of the CPS tree is now an example of case (b), which can be converted by processing convert-loop again to its final form: ((lambda (g) (letrec ((fact (i ff) (if (<= i 0 ) (lambda ( ) (g ff)) (lambda ( ) (fact (- i 1 ) (* i fϊ)))))) (fact n l))) (lambda (v) (+ C v 3))) Note that fact is now a continuation, which invokes g directly in order to exit. Code generation is simplified since fact can be treated like any other continuation, without requiring any further special processing. Example 2: The Dylan expression: (+ (if(> x O) (bind ((f (method (yy) (+ yy x)))) (if(> y θ ) (fy) (f(- y)))) 0) 4) yields the following standard CPS tree: ((lambda (g) if(> x 0 ) (lambda ( ) ((lambda (f) (if(> y θ ) (lambda ( ) (fg y)) (lambda ( ) (- (lambda (my) (f g my)) y)))) (lambda (k yy) (+ k yy x)))) (lambda ( ) (g 0)))) (lambda (v) (+ C v 4))) Note that although this expression does not contain any loops in the traditional sense, the set consisting of just the definition of f, (lambda (k yy) (+ k yy x)), along with the distinguished continuation variable g, satisfies the definition of a "loop set." Note also that every reference to f occurs within the scope of g, making this an example of case (b). The loop conversion algorithm of the invention re-writes this CPS tree to: ((lambda (g) (if(> x 0) (lambda ( ) ((lambda (f) (if(> y 0) (lambda ( ) (f y)) (lambda ( ) (- (lambda (my) (f my)) y)))) (lambda (yy) (+ g yy x)))) (lambda ( ) (g 0)))) (lambda (v) (+ C v 4))) Note that the value of f, (lambda (yy) (+ g yy x)), is now a continuation function, and it includes a direct reference to the distinguished continuation, the variable g. Example 3: (bind ((f (method (a) (* a 2)))) (+(if(<xO) (f(- χ )) (fx)) 1)) Normal conversion to standard CPS yields the following CPS tree: ((lambda (f) ((lambda (g) (if(<x0) (lambda ( ) (- (lambda (xx) (f g xx)) x)) (lambda ()(fgx)))) (lambda (v)(+Cvl)))) (lambda (k a) (* k a 2))) Here the loop set is the single value for f, (lambda (k a) (* k a 2)), and the distinguished continuation is the variable g. Note also that (lambda (k a) (* k a 2)) falls outside the scope of the variable g, making this an example of case (c). The loop conversion algorithm of the invention transforms this CPS tree into the following tree: ((lambda (g) ((lambda (f) (if(<x0) (lambda ( ) (- (lambda (xx) (f g xx)) x)) (lambda ()(fgx)))) (lambda (k a) (* k a 2)))) (lambda (v)(+Cvl))) which is an example of case (b). The conversion algorithm then runs again, to produce: ((lambda (g) ((lambda (f) if(<x0) (lambda ( ) (- (lambda (xx) (f xx)) x)) (lambda ( ) (fx)))) (lambda (a) (* g a 2)))) (lambda (v) (+ C v l))) Note that f s definition, (lambda (a) (* c a 2)), is now a continuation lambda expression, which invokes the distinguished continuation, g, directly as its exit. Where condition (b) obtains, as will be clear from the foregoing examples, then without difficulty we may replace all references to the continuation arguments of the members of S (other than references in calls to members of S) by references to C, and then we may delete the continuation arguments themselves and convert all the member of S into continuations. (The continuation argument in all calls to all members of S can be removed: they were either recursive calls, or calls with C as the continuation). For case (c), the criteria for selection of S, however, determined by the two procedures is-a-loop-p and find-loop-set-and-continuation, guarantees that all non-recursive references to members of S fall within the scope of C. Therefore, it is possible to "move" on the intermediate node tree the definitions of all the members of S so that they fall within the scope of C, without worrying that doing so will leave a reference to a member of S outside the scope of the newly constructed definition. For case (a) in which C happens to be a clambda node, rather than a continuation variable, we simply introduce a new continuation variable, binding it to the clambda in question, and then handle it as described above. Thus, the procedure to be followed to ensure that code representing loops and other code has been converted to the optimized form of CPS such that the resultant code can be compiled with the same code generator that is used for processing non-loop continuation functions is illustrated in Fig. 2. The source code is processed in the usual way, and converted to form the standard CPS tree (block 15 of Fig. 1), and, in accordance with the first part of the algorithm of the invention, procedures find-loop-set-and-continuation 21 and is-a-loop-p 22 are then applied. If the find-loop-set-and-continuation procedure returns a full loop set plus the continuation, indicated by the test block 23, then a loop set is present that can be converted 24 to optimized CPS using the convert-loop procedure of the invention. Otherwise, code is present that is retained 25 in its original CPS form. The resultant code can be processed by the same code generator in a more efficient and effective manner. It will be appreciated that implementing the two parts of the algorithm described above in Scheme or Lisp code will be evident to any programmer of ordinary skill familiar with the language and CPS. It will be further understood that the invention is not limited to the details of the algorithms given, and these skilled in this art following the principles enunciated herein will be able to devise other ways of converting source loop expressions to CPS to produce code that can be processed with the same code generator as non-loop continuation functions in accordance with the invention. It is further noted that Example 1 is of code that represents a true loop, which is the situation which would principally use the invention for the reasons given above. Examples 2 and 3 do not contain loops in the traditional sense. Nevertheless, the standard CPS tree satisfies the definition of a "loop set", and thus subjecting the standard CPS trees to the convert-loop algorithm of the invention will result in an optimized continuation function that can be treated by the code generator in a simpler and more efficacious manner. Although there have been described what are at present considered to be the preferred embodiments of the invention, it will be understood that the invention may be embodied in other specific forms without departing from the essential characteristics thereof. The present embodiments are therefore to be considered in all respects as illustrative, and not restrictive. This scope of the invention is indicated by the appended claims rather than by the foregoing description.

Claims: WHAT IS CLAIMED IS: 1. In a compilation method for processing a source program in a programming language in the Scheme/Lisp family into a representation known as continuation-passing style (CPS), wherein CPS represents the program as an organization of lambda expressions, the improvement comprising: (a) converting non-continuation functions which representToops in the source program into continuation functions; (b) processing the continuation functions produced by step (a) to generate code with the same code generator that is used for processing non-loop, continuation functions in the source program to generate code. 2. The method of claim 1, wherein, during code generation, calls to continuations are implemented by explicit or implicit jump or branch instructions whereas calls to non-continuation functions are implemented by subroutine call instructions. 3. In a compilation method for processing a source program in a programming language in the Scheme/Lisp family into a representation known as continuation-passing style (CPS), wherein CPS represents the program as an organization of lambda expressions, the improvement comprising: (a) processing the source program to form standard CPS; (b) processing the standard CPS to identify set members and a distinguished continuation of a loop set of non-continuation lambda expressions (NCLEs); (c) converting the set identified in step (a) into optimized CPS continuation functions. 4. The method of claim 3, wherein said identified set has the property that every reference to every name of the NCLEs is a call, and each such call is either a tail call from some member of the set, or a call with some distinguished continuation argument. 5. The method of claim 4, further comprising the step of: (c) processing the continuation functions produced by step (c) to generate code with the same code generator that is used for processing non-loop, continuation functions in the source program to generate code. 6. The method of claim 3, wherein, during code generation, calls to continuations are implemented by explicit or implicit jump or branch instructions whereas calls to non-continuation functions are implemented by subroutine call instructions. 7. In a compiler for processing a source program in a programming language in the Scheme/Lisp family into a representation known as continuation-passing style (CPS) before generating object code, wherein CPS represents the program as an organization of lambda expressions, the improvement comprising: (a) means for converting non-continuation functions which represent loops in the source program into continuation functions; (b) means for processing the continuation functions produced by step (a) to generate code with the same code generator that is used for processing non-loop, continuation functions in the source program to generate code. 8. In a compiler for processing a source program in a programming language in the Scheme/Lisp family into a representation known as continuation-passing style (CPS) before generating object code, wherein CPS represents the program as an organization of lambda expressions, the improvement comprising: (a) means for converting non-continuation functions in the source program into standard continuation functions; (b) means for processing the standard continuation functions to identify set members and a distinguished continuation of a set of non-continuation lambda expressions (NCLEs); (c) means for converting the loop set identified in step (b) into optimized CPS continuation functions. 9. The compiler of claim 8, wherein said means of element (b) comprises means that has the property that every reference to every name of the NCLEs is a call, and each such call is either a tail call from some member of the set, or a call with some distinguished continuation argument. 10. The compiler of claim 9, further comprising: (d) means for processing the continuation functions produced by element (c) to generate code with the same code generator that is used for processing non-loop, continuation functions in the source program to generate code. 11. The compiler of claim 8, wherein the means of element (b) comprises means for applying to the standard continuation functions a first procedure that determines whether a set S of named NCLEs is part of a loop set with a particular continuation C, and if it is, the first procedure returns the smallest extension of S which makes a loop. 12. The compiler of claim 11, wherein the means of element (b) further comprises means for applying to the code a second procedure that takes a set S of named NCLEs and determines whether there is a continuation relative to which the named NCLEs can be extended into a loop, and if so returns the full loop set plus the continuation. 13. The compiler of claim 12, wherein the means of element (c) further comprises means for converting into optimized continuation lambdas all the members of the full loop set returned by the second procedure.

Inventors: PIAZZA JEFFREY E, PIAZZA, JEFFREY, E.
Applicants: APPLE COMPUTER, APPLE COMPUTER, INC.
Application year: 1994
Main classification: G06F9
IPC codes: G06F9