Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

korean language maybe

  • Loading branch information...
commit 2846f28254b5d7a979b51c449dcda71bcc1e3d1a 1 parent 604e460
@dyoo authored
Showing with 51 additions and 0 deletions.
  1. +51 −0 lang/korean.rkt
View
51 lang/korean.rkt
@@ -0,0 +1,51 @@
+#lang s-exp "base.rkt"
+
+(require (for-syntax racket/base))
+
+
+(define-syntax 정의
+ (make-rename-transformer #'define))
+
+
+(define-syntax 정의-구조
+ (make-rename-transformer #'define-struct))
+
+
+(define-syntax 지역
+ (make-rename-transformer #'local))
+
+
+(define-syntax 조건부
+ (make-rename-transformer #'cond))
+
+
+(define-syntax 다른
+ (make-rename-transformer #'else))
+
+
+(define-syntax
+ (make-rename-transformer #'if))
+
+
+(define-syntax 케이스
+ (make-rename-transformer #'case))
+
+
+(define-syntax 람다
+ (make-rename-transformer #'lambda))
+
+
+(define-syntax 수정
+ (make-rename-transformer #'set!))
+
+
+(define-syntax 또는
+ (make-rename-transformer #'or))
+
+
+(define-syntax
+ (make-rename-transformer #'and))
+
+
+(define-syntax 필요
+ (make-rename-transformer #'require))
Please sign in to comment.
Something went wrong with that request. Please try again.