ranger-compiler 3.0.3 → 3.0.5

package/dist/lib/lib/WebLib.rgr

@@ -1,47 +0,0 @@
-systemclass View {
-  java7 View
-  es6 View
-}
-
-systemclass Button {
-    java7 Button
-    es6 HTMLElement
-}
-
-operators {
-    setTextNotUsed _:void (btn:Button txt:string) {
-        templates {
-            ranger  ( "(setText " (e 1) " " (e 2) " )" )
-        }
-    }
-}
-
-
-
-operator type:void es6 {
-
-  fn findView:View (name:string) (
-    "view.querySelectorAll('[x-id=" (str 1) "]')[0]"
-  )
-
-  fn setText (btn:Button txt:string) ( (e 1) ".textContent = " (e 2) "; // ?? " )
-  
-  ; ev:(_:void (view:View))
-  fn onClick:void (view:View ev:block) (
-    (e 1) ".addEventListener('click', () => {" nl
-      I (block 2) nl i 
-     "});" nl
-  )
-
-  fn loadFragment:void ( pageName:string into:string ) (
-        "() => {" nl
-         I "var replaced = view.querySelectorAll('[x-id=" (str 2) "]')[0];" nl
-           "var newChild = document.querySelectorAll('[x-id=" (str 1) "]')[0];" nl
-           "replaced.parentNode.replaceChild(newChild, replaced);" nl
-         i "}();" nl
-  ) 
-}
-
-operator type:void ranger {
-  fn setText (btn:Button txt:string) ( "(setText " (e 1) " " (e 2) " )" )
-}

package/dist/lib/lib/WebServerLib.rgr

@@ -1,137 +0,0 @@
-
-; Plan:
-; to support: Go, PHP, Node.js
-
-; maybe could be using Scalatra
-; http://scalatra.org/guides/2.5/http/routes.html
-
-
-class DefinedHTTPServer {
-    def port:int 80
-    constructor ( p:int ) {
-        this.port = p
-    }
-    fn golangPortStr:string () {
-        return (":" + port)
-    }
-}
-
-systemclass WebServer {
-    es6 Object
-    go "*DefinedHTTPServer"
-}
-
-systemclass WebRequest {
-    es6 Object
-    go "*http.Request"
-}
-
-systemclass WebResponse {
-    es6 Object
-    go "http.ResponseWriter"
-}
-
-
-operators {
-    create_web_server _:WebServer ( port:int ) {
-        templates {
-            go ( "CreateNew_DefinedHTTPServer(" (e 1) ")" 
-                (imp "net/http")
-                (imp "fmt")            
-            )
-            ranger ("(create_web_server " (e 1) ")")
-            es6 ("(require('express'))()")
-        }
-    }
-    prepare_server _:void ( s:WebServer )  {
-        templates {
-            ranger ("(prepare_server " (e 1) ")")
-            es6 (
-    (e 1) ".use(function(req, res, next){" nl I
-        "var data = '';" nl
-        "req.on('data', function(chunk){ " nl I
-            "data += chunk;" nl i
-        "});" nl 
-        "req.on('end', function(){"nl I
-          "req.rawBody = data;" nl 
-          "next();" nl i
-        "})" nl i
-    "});" nl    
-
-            )
-            go ()
-        }
-    }
-}
-
-
-operator class:WebRequest es6 {
-    fn get_post_data:string () ( (e 1) ".rawBody" )
-    fn getVar:string ( varName:string ) ( (e 1) ".query[" (e 2) "] ? " (e 1) ".query[" (e 2) "] : \"\" ")
-}
-operator class:WebResponse es6 {
-    fn contentType ( typeName:string) (
-            (e 1) ".writeHead(200,  {'Content-Type': " (e 2) "});"
-    )
-    fn plaintext () ( (e 1) ".writeHead(200,  {'Content-Type': 'text/plain'});")
-    fn send (value:string) ( (e 1) ".send(" (e 2) ")")
-    fn sendFile (value:string) ( (e 1) ".sendFile(" (e 2) ")")
-}
-
-operator class:WebServer es6 {
-    fn startServer ( post:int code:block) ( (e 1) ".listen(" (e 2) ", () => {" nl I (e 3) i nl "})" )
-    fn route ( path:string cb:(_:void (req:WebRequest res:WebResponse))) ( (e 1) ".get(" (e 2) ", " nl I (e 3) i nl ")" )
-    fn post_route ( path:string cb:(_:void (req:WebRequest res:WebResponse))) ( (e 1) ".post(" (e 2) ", " nl I (e 3) i nl ")" )    
-}
-
-; http.HandleFunc("/", handler)
-; body, err := ioutil.ReadAll(r.Body)
-
-operators {
-    getVar _:string ( varName:string ) {
-        templates {
-            go ('req.URL.Query().Get(' (e 1) ')')
-        }
-    }
-    get_post_data _:string ( req:WebRequest) {
-        templates {
-            go ( "_req_to_string(" (e 1) ")"
-                (imp "io/ioutil")
-(create_polyfill "
-func _req_to_string (r *http.Request) string {        
-    body, err := ioutil.ReadAll(r.Body)
-    if err != nil {
-        return \"\"
-    }
-    return string(body)
-}
-")
-            )
-        }
-    }
-;    class:WebRequest go {
-;    fn get_post_data:string () 
-
-}
-operator class:WebServer go {
-    fn startServer ( port:int code:block) ( "http.ListenAndServe( " (e 1) ".golangPortStr(), nil)"  )
-    fn route ( path:string cb:(_:void ( res:WebResponse req:WebRequest))) ( "http.HandleFunc(" (e 2) ", " (e 3) ")" )
-    fn post_route ( path:string cb:(_:void ( res:WebResponse req:WebRequest))) ( "http.HandleFunc(" (e 2) ", " (e 3) ")" )
-}
-; http.ServeFile(w, r, "file")
-operator class:WebResponse go {
-    fn contentType ( typeName:string) (
-            (e 1 ) ".Header().Add(\"Content-Type\", " (e 2) ")"
-    )
-    fn send (value:string) ( "fmt.Fprint( " (e 1) ", " (e 2) ")")
-    fn sendFile (value:string) ( "http.ServeFile("  (e 1) ", req, " (e 2) ")")    
-}
-operator class:WebRequest go {
-;     fn get_post_data:string () ( (e 1) ".rawBody" )
-    fn getVar:string ( varName:string ) ( (e 1) ".URL.Query().Get(" (e 2) ")")
-}
-
-
-
-
-

package/dist/lib/lib/ranger-dir.rgr

@@ -1,175 +0,0 @@
-
-systemclass  UIElement {
-    es6          DOMElement
-}
-
-systemclass SystemDate {
-    es6 Date
-}
-
-systemclass SystemUnixDate {
-    es6 Number
-}
-
-operators {
-    watch_has_file cmdFiles:boolean () {
-        templates {
-            es6  ( " typeof(_fileName) != 'undefined' " )
-        }
-    }
-    ; statSync
-
-    to_date _:SystemDate ( timevalue:int ) {
-        templates {
-            es6 ( "(new Date(" (e 1) "))" )
-        }     
-    }
-
-    remove_file _:void (path:string name:string) {
-        templates {
-            ranger ('(remove_file ' (e 1)' ' (e 2) ' )')
-            es6 ('(require("fs")).unlinkSync(' (e 1) ' + "/" + ' (e 2) ')')
-        }
-    }
-
-    utc_to_string _:string ( sd:int ) {
-        templates {
-            es6 ( "(new Date(" (e 1) ")).toString()" )
-        }     
-    }
-
-    file_created _:int ( path:string) {
-        templates {
-            es6 ( "(new Date((require('fs')).statSync(" (e 1) ").birthtime)).getTime()" ) 
-        }     
-    }
-
-    file_modtime _:int ( path:string) {
-        templates {
-            es6 ( "(new Date((require('fs')).statSync(" (e 1) ").mtime)).getTime()" )
-        }     
-    }
-
-    file_modtime_str _:int ( path:string) {
-        templates {
-            es6 ( "(new Date((require('fs')).statSync(" (e 1) ").mtime)).toString()" )
-        }     
-    }    
-
-    watch_filename cmdFiles:string () {
-        templates {
-            es6 ( "_fileName" )
-        }        
-    }    
-    watch_dir cmdFiles:void (path:string code:block) {
-        templates {
-            es6 ( "require('fs').watch(" (e 1) ", (_eventType, _fileName) => { " nl I (block 2) i nl " })" )
-        }        
-    }
-
-    cs_list_dir_files cmdFiles:[string] (path:string) {
-        templates {
-            csharp( "new List<String>(Directory.GetFiles(" (e 1) "))" (imp "System") (imp "System.IO") (imp "System.Collections.Generic"))         
-        }¨
-    }   
-
-
-    ; Path.GetFileName  
-    list_dir_files cmdFiles:[string] (path:string) {
-        templates {
-            ranger ( '(list_dir_files (' (e 1) '))')
-            go ( 'r_io_list_directory(' (e 1) ')'
-
-(create_polyfill `
-
-func r_io_list_directory( path string ) []string {
-    res := make([]string, 0)
-    files, err := ioutil.ReadDir("./")
-    if err != nil {
-        return res
-    }
-    for _, f := range files {
-        res = append(res, f.Name())
-    }
-    return res
-}
-
-`)
-
-            )
-            csharp ("DirListReader.getFiles(" (e 1) ")"
-
-(create_polyfill 
-"
-class DirListReader {
-    public static List<String> getFiles( String path ) {
-        string[] names = Directory.GetFiles(path);
-        string[] basenames = new string[names.Length];
-        for(int i=0; i<names.Length; i++) {
-            basenames[i] = Path.GetFileName(names[i]);
-        }
-        return (new List<String>(basenames));
-    }
-}
-"
-) )
-            es6 ( "require('fs').readdirSync(" (e 1) ")" )
-            cpp ( "__cpp_list_directory_files(" (e 1) ")"
-(create_polyfill
-"
-
-#ifdef _MSC_VER
-    #include <windows.h>
-#else
-#endif
-
-std::vector<std::string> __cpp_list_directory_files(std::string dirName) {
-    WIN32_FIND_DATA data;
-    std::vector<std::string> fileList;
-    std::string query = (dirName + \"\\\\*\");
-    HANDLE hFind = FindFirstFile(query.c_str(), &data);      // DIRECTORY
-
-    if ( hFind != INVALID_HANDLE_VALUE ) {
-        do {
-            std::string name(data.cFileName);
-            fileList.push_back( name );
-        } while (FindNextFile(hFind, &data));
-        FindClose(hFind);
-    }   
-    return fileList;
-}
-"
-
-
-            )
-        }        
-    }
-    is_directory cmdFiles:boolean (path:string) {
-        templates {
-            es6 ( "require('fs').statSync(" (e 1) ").isDirectory()" )
-        }        
-    }
-    is_file cmdFiles:boolean (path:string) {
-        templates {
-            es6 ( "require('fs').statSync(" (e 1) ").isFile()" )
-        }        
-    }
-}
-
-class testFilesystem {
-    fn test_case:void () {
-        print "Directory testing ready"
-        def list:[string] (list_dir_files ".")
-        for list name:string i {
-            if( ( indexOf name ".js" ) > 0 ) {
-                print name
-            }
-        }
-        ; watch interface...
-        watch_dir "." {
-            if( watch_has_file) {
-                print "... something changed with " + (watch_filename)
-            }
-        }
-    }
-}