Skip to content

Commit

Permalink
Merge pull request #22 from PESchoenberg/develop
Browse files Browse the repository at this point in the history
Improved comments.
  • Loading branch information
PESchoenberg authored Nov 12, 2019
2 parents 281a895 + e5cf21b commit 9a9b6cf
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions grsp0.scm
Original file line number Diff line number Diff line change
Expand Up @@ -226,7 +226,6 @@
; [Accessed 15 Sep. 2019].

(define (grsp-save-to-file p_s p_f p_m)
;(let ((output-port (open-file p_f "a")))
(let ((output-port (open-file p_f p_m)))
(display p_s output-port)
(newline output-port)
Expand Down Expand Up @@ -275,7 +274,7 @@
(system (strings-append (list p_p p_d p_s p_a) 1)))


; grsp-ld - line and display. Displays a string after a newline.
; grsp-ld - Line and display. Displays a string after a newline.
;
; Arguments:
; - p_s: string.
Expand All @@ -285,7 +284,7 @@
(display p_s))


; grsp-cd - same as grsp-ld, but performs a clear instead of newline, meaning
; grsp-cd - Same as grsp-ld, but performs a clear instead of newline, meaning
; that it clears the screen or console instead of just adding a line break.
;
; Arguments:
Expand Down

0 comments on commit 9a9b6cf

Please sign in to comment.