C-like mode

AخA
 
1
 /* C demo code */ #include
2
            <zmq.h> #include
3
                <pthread.h> #include
4
                    <semaphore.h> #include
5
                        <time.h> #include
6
                            <stdio.h> #include
7
                                <fcntl.h> #include
8
                                    <malloc.h> typedef struct { void* arg_socket; zmq_msg_t* arg_msg; char* arg_string; unsigned long arg_len; int arg_int, arg_command; int signal_fd; int pad; void* context; sem_t sem; } acl_zmq_context; #define p(X) (context->arg_##X)
9
                                        void* zmq_thread(void* context_pointer) { acl_zmq_context* context = (acl_zmq_context*)context_pointer; char ok = 'K', err = 'X'; int res; while (1) { while ((res = sem_wait(&context->sem)) == EINTR); if (res)
10
                                        {write(context->signal_fd, &err, 1); goto cleanup;} switch(p(command)) { case 0: goto cleanup; case 1: p(socket) = zmq_socket(context->context, p(int)); break; case 2: p(int) = zmq_close(p(socket)); break; case
11
                                        3: p(int) = zmq_bind(p(socket), p(string)); break; case 4: p(int) = zmq_connect(p(socket), p(string)); break; case 5: p(int) = zmq_getsockopt(p(socket), p(int), (void*)p(string), &p(len)); break; case 6: p(int)
12
                                        = zmq_setsockopt(p(socket), p(int), (void*)p(string), p(len)); break; case 7: p(int) = zmq_send(p(socket), p(msg), p(int)); break; case 8: p(int) = zmq_recv(p(socket), p(msg), p(int)); break; case 9: p(int) = zmq_poll(p(socket),
13
                                        p(int), p(len)); break; } p(command) = errno; write(context->signal_fd, &ok, 1); } cleanup: close(context->signal_fd); free(context_pointer); return 0; } void* zmq_thread_init(void* zmq_context, int signal_fd)
14
                                        { acl_zmq_context* context = malloc(sizeof(acl_zmq_context)); pthread_t thread; context->context = zmq_context; context->signal_fd = signal_fd; sem_init(&context->sem, 1, 0); pthread_create(&thread, 0, &zmq_thread,
15
                                        context); pthread_detach(thread); return context; } 

C++ example

10
 
1
 #include
2
            <iostream> #include "mystuff/util.h" namespace { enum Enum { VAL1, VAL2, VAL3 }; char32_t unicode_string = U"\U0010FFFF"; string raw_string = R"delim(anything you want)delim"; int Helper(const MyType& param) { return 0; } } // namespace class ForwardDec;
3
                template
4
                <class T, class V> class Class : public BaseClass { const MyType
5
                    <T, V> member_; public: const MyType
6
                        <T, V>& Method() const { return member_; } void Method2(MyType
7
                            <T, V>* value); } template
8
                                <class T, class V> void Class::Method2(MyType
9
                                    <T, V>* value) { std::out
10
                                        << 1>> method(); value->Method3(member_); member_ = value; } 

Objective-C example

3
 
1
 /* This is a longer comment That spans two lines */ #import
2
            <Test/Test.h> @implementation YourAppDelegate // This is a one-line comment - (BOOL)application:(UIApplication *)application didFinishLaunchingWithOptions:(NSDictionary *)launchOptions{ char myString[] = "This is a C character array"; int test = 5; return
3
                YES; } 

Java example

4
 
1
 import com.demo.util.MyType; import com.demo.util.MyInterface; public enum Enum { VAL1, VAL2, VAL3 } public class Class
2
            <T, V> implements MyInterface { public static final MyType
3
                <T, V> member; private class InnerClass { public int zero() { return 0; } } @Override public MyType method() { return member; } public void method2(MyType
4
                    <T, V> value) { method(); value.method3(); member = value; } } 

Scala example

3
 
1
 object FilterTest extends App { def filter(xs: List[Int], threshold: Int) = { def process(ys: List[Int]): List[Int] = if (ys.isEmpty) ys else if (ys.head
2
            < threshold) ys.head :: process(ys.tail) else process(ys.tail) process(xs) } println(filter(List(1,
3
            9, 2, 8, 3, 7, 4), 5)) } 

Simple mode that tries to handle C-like languages as well as it can. Takes two configuration parameters: keywords, an object whose property names are the keywords in the language, and useCPP, which determines whether C preprocessor directives are recognized.

MIME types defined: text/x-csrc (C), text/x-c++src (C++), text/x-java (Java), text/x-csharp (C#), text/x-objectivec (Objective-C), text/x-scala (Scala), text/x-vertex and x-shader/x-fragment (shader programs), text/x-squirrel (Squirrel).