From c4f75486b606741e7053af7f16032ab384e90b44 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 13 Nov 2018 17:57:44 -0500 Subject: [PATCH] Added TODO --- scheme/cyclone/cps-opt-local-var-redux.scm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/scheme/cyclone/cps-opt-local-var-redux.scm b/scheme/cyclone/cps-opt-local-var-redux.scm index 3a83c100..88f8d567 100644 --- a/scheme/cyclone/cps-opt-local-var-redux.scm +++ b/scheme/cyclone/cps-opt-local-var-redux.scm @@ -59,6 +59,8 @@ ;; (car (ast:lambda-body (car exp))) ;; (car (ast:lambda-args (car exp)))))) ;;(newline) +TODO: need to revisit this, may need to replace values with assignments to the "let" variable. +would need to be able to carry that through to cgen and assign properly over there... (let ((value (lvr:tail-calls->values (car (ast:lambda-body (car exp))) (car (ast:lambda-args (car exp)))))