Skip to content

Commit

Permalink
CHeckpoint.
Browse files Browse the repository at this point in the history
  • Loading branch information
Burton Samograd committed Jun 21, 2018
1 parent 104ab97 commit 78ae8b1
Show file tree
Hide file tree
Showing 3 changed files with 16 additions and 4 deletions.
5 changes: 5 additions & 0 deletions hello.sxc
Original file line number Diff line number Diff line change
@@ -1,3 +1,8 @@
// hello.sxc - the first program
//
// Burton Samograd
// 2018

(#include <stdio.h>)
(int main ((int argc) (char (** argv)))
(printf "Hello, World!\n"))
Expand Down
7 changes: 7 additions & 0 deletions sxc.lisp → main.lisp
Original file line number Diff line number Diff line change
@@ -1,3 +1,10 @@
// main.lisp: sxc
//
// sxc is a command line C-like s-expression to 'C' transpiler.
//
// Burton Samograd
// 2018

(defpackage :main
(:use cl)
(:export main))
Expand Down
8 changes: 4 additions & 4 deletions sswitch.sxc
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
;; sswitch - string switch
;;
;; a switch statement that works with strings
;;
// sswitch - string switch
//
// a switch statement that works with strings
//
(macro sswitch (val &body cases)
(labels ((genswitch (cases)
(let* ((case (car cases))
Expand Down

0 comments on commit 78ae8b1

Please sign in to comment.